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 :)
timpero_
1
99
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
Se oli siinä sitten
Yhdysvaltain presidentti Donald Trump on määrännyt kaiken maan Ukrainalle toimittaman sotilaallisen tuen tauolle, kertoo7272266Paljonko aikaa on kulunut siitä kun viimeksi tapasit hänet?
Päiviä? Viikkoja? Kuukausia? Vuosia?502259- 1252173
- 1272113
- 541756
Trump tekee rauhan Amerikan ja Venäjän ehdoilla
Ukraina luovuttaa Venäjän haluamat alueet Venäjälle. Ukraina luovuttaa Amerikan haluamat arvokkaat mineraalit Amerikall2411633- 311361
Syvälliset keskustelut
Olisivat tärkeintä ensisijaisesti hänen kanssaan Tulisi sellainen hetki, mutta kaikki meni pieleen201309Olisipa sitä henkisesti eheämpi ja rohkeampi
mikään maallinen mammona ei itseäni kiinnosta, eikä sen menetys kiinnostus. Mutta kun kohtaa jonkun sykäyttävän ihmisen,161195Kyllähän tämä vähän kirpaisee
Mutta oman sisäisen rauhan vuoksi jätän sinut nyt historiaan. Todennäköisesti olet jo sinäkin mennyt eteenpäin. Olipah381137