Olen täysin aloittelija vba:n kanssa. Voisiko joku ihana ihminen suomentaa mitä seuraavassa koodipätkässä tapahtuu? Minusta se näyttää siltä että välilehdeltä nimeltään DATA1 valitaan kaikki solut, sitten ne kopioidaan, sitten ne liitetään(mutta minne??) ja lopuksi ne tyhjennetään. Eli minun järjelläni ihan yhtä tyhjän kanssa?? :D Joten luultavasti en ymmärrä koodia oikein :) Voisiko joku viisaampi auttaa? :)
Sheets("DATA1").Select
Cells.Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues
Range("E6:H10000").Select
Application.CutCopyMode = False
Selection.ClearContents
Range("A1").Select
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
VBA koodin suomennos :)
1
88
Vastaukset
Sheets("DATA1").Select
Cells.Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues
Data1 solujen arvot muutetaan arvoiksi.
eli jos esim. solussa on kaava =A1 A2 kaava poistetaan ja kaavan tilalle laskukaavan tulos
Range("E6:H10000").Select
Application.CutCopyMode = False
Selection.ClearContents
Alueen E6:H10000 sisältö tyhjennetään
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
suojataan taulukko
hieman selkeemmin sama
With Sheets("DATA1")
.Cells.Copy
.Range("A1").PasteSpecial Paste:=xlPasteValues
.Range("E6:H10000").ClearContents
.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End With
Keep EXCELing
@Kunde
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Mikä on kaivattusi etunimi?
Otsikossa siis on kysymys eriteltynä. Vain oikeat vastaukset hyväksytään.1482845En kestä katsoa
Sitä miten sinusta on muut kiinnostuneita. Olen kateellinen. Siksi pitäisi lähteä pois941569- 1401474
Peräti 95 % persujen kannattajista rasisteja
Kertoo EVA:n teettämä kysely. Pakollista yhdenvertaisuuskoulutusta tarvitsee siis paljon laajempi joukko kuin pelkästää3611360Kun viimeksi kohtasitte/näitte
Mitä olitte tekemässä? Millainen ympäristö oli? Löydetään toisemme...1171314Olet kyllä vaarallisen himokas
Luova, kaunis, määrätietoinen, pervo, mielenkiintoinen, kovanaama, naisellinen ja erikoinen.991165Anna 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 tunnet15881On minulla suunitelma
Siitä ei vain tiedä kukaan muu kuin tällä hetkellä minä. Suunnitelma ja varasuunnitelma. Sinun takiasi nainen. Vain s47840Palstan ylivoimaisesti suosituin keskustelunaihe
Palstan suosituin keskustelunaihe näyttää olevan homoseksuaalisuus. Otsikoiden perusteella voisi kuvitella olevansa Seks254787- 55754