Minulla on iso monimutkainen taulukko jossa osaan soluja tulee arvot kaavoista.
Kuinka kopioin toiseen taulukkoon sellaiset solut joiden arvo on laskettu kaavoista. Haluan siis kopioida näkyvät arvot mutta en pohjalla lymyäviä kaavoja.
Solujen arvojen kopiointi ilman kaavoja
4
5585
Vastaukset
- -namiskuukkeli-
Valitse solut jotka haluat kopioida. Kopioi ne hiirulaisen oikealla namiskuukkelilla. Valitse solualue johon haluat liittää kopioidut. Liitä hiirulaisen oikealla namiskuukkelilla mutta valitse avautuvasta ikkunasta kohta liitä määräten. Siinä ikkunasa on valikko josta voit valita haluamasi vaihtoehdon joita on useita.
Kokeiile ensin jollain huuhaa taulukolla niin huomaat että se on helppoa mutta joskus vaan ei muista eikä osaa kaikkea ja se tekee ihmisestä ihmisen eikä robottia. ; ) - 15+4
Seuraava funktio palauttaa kaavalla saadut sisällöt.
Function kaavantulos(r As Range)
f = r.Formula
v = r.Value
If (InStr(f, "=") = 1) Then
kaavantulos = v
Else
kaavantulos = ""
End If
End Function kopioi kaavasolut aktiivisesta taulukosta taulukko2 samoihin soluihin...
Sub b()
For Each solu In Cells.SpecialCells(xlCellTypeFormulas)
solu.Copy
Worksheets("Taul2").Range(solu.Address).PasteSpecial xlPasteValues
Next
Application.CutCopyMode = False
End Sub
Keep EXELing
@KundeFunction kaavantulos(r As Range)
f = r.Formula
v = r.Value
If (InStr(f, "=") = 1) Then
kaavantulos = v
Else
kaavantulos = ""
End If
End Function
turhaa testailua kun excelissä valmis funktio...
sama
Function kaavantulos2(r As Range)
If r.HasFormula Then
kaavantulos2 = r.Value
Else
kaavantulos2 = ""
End If
End Function
Keep EXCELing
@Kunde
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Anna vielä vähän vihreää valoa
Teen sitten siirtoni, nainen. Tiedän, että olet jo varovaisesti yrittänyt lähestyä, mutta siitä on jo aikaa. Jos tunnet281748- 2271160
Koulu kielsi therianit - "tunneilla kontataan ja nau'utaan"
Oululainen koulu on kieltänyt eläin- ja rooliasujen käytön koulussa. Hyvä homma, sillä koulussa keskitytään muihin asioi105799- 180777
Onhan se myönnettävä
Että alkaa jo vähän puuduttamaan tämä. Aion silti ottaa tästä kaiken irti viimeisiä rippeitä myöden. Olenpa sitten suju51760Astuin tuntemattomaan
kun sinut tapasin, sieluni valo. Niin olen paljaaksi riisuttu kuin syksyiset puut.50742Rakastan sinua niin paljon
Kun ollaan tutustuttu lisää niin se rakkaus ei ole vähentynyt vaan muuttunut. Jännitys on vähentynyt ja tilalle on tullu40710Enemmistön diktatuuri Ähtärin valtuustossa
Salo ja Nortunen, ette saa keikuttaa venettä. Olette mätiä omenoita, jotka pitää poimia pois Ähtärin kaupunginhallitukse22710Taisit vähän aliarivoida minua ihmisenä
Et tajunnut että olenkin aika nokkela tyttö 🤭 Jutut ja ulkonäkö varmaan hämäs.35686Mulla on ihan hirveä ikävä sua
Ja sitten kun me taas nähdään, tai jos, niin mua vaan pelottaa että sinä inhoat sitä että mulla on tunteita sinuun.47679