Olen tehnyt erääseen tehtävään liittyen makron joka muuttaa koko taulukon tekstin kursivoiduksi, asettaa fonttikooksi 12
ja tasaa sen oikealle. Homma toimii muuten hyvin mutta kohditimen pitäisi palautua samaan soluun jossa se oli ennen makron suorittamista. Solu ei luonnollisesti ole määriteltävissä etukäteen.
Löytyisikö keneltäkään gurulta tietoa miten tuollaisen pystyy tekemään?
Kohdistin palaamaan makron suorittamista edeltävään soluun
Aloittelija...
2
352
Vastaukset
- paavali50
Laita makron alkuun: Set p = ActiveCell
Ja loppuun: p.Activate jos oikein tekee eli ...
Sub Koe1()
With Cells
.Font.Size = 12
.Font.Italic = True
End With
End Sub
mutta makronauhottimella tehdessä olet siirtänyt kohdistuksen alkuperäisestä solusta pois, joten vaatii palautuksen esim. noin
Sub Koe2()
Dim Vanha As String
Vanha = ActiveCell.Address
'koodia...
Range(Vanha).Select
End Sub
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
JOKO OLETTE KUULLET, MITÄ KIURUVEDELLÄ ON SATTUNUT!
Oletteko jo kuulleet, mitä Kiuruvedellä on sattunut, voi hyvänen aika? Aivan viime tuntien aikana olisi sattunut, jos t3311625Hetken jo luulin, että en ikävöi sinua koko aikaa
Mutta nyt on sitten taas ihan hirveä ikävä jotenkin. Tiedätköhän sinä edes, kuinka peruuttamattomasti minä olen sinuun r357501V*ttuu että mä haluan sua
Jos jotain ihmistä voi kunnolla haluta, niin hän on se. Voi Luoja auta jo! Joku jeesus hjelppa mej!823929Nolointa ikinä miehelle
On ghostata nainen jonka kanssa on ollut ystävä tai ollu orastavaa tapailua pidemmän aikaa. Osoittaa sellaista moukkamai1063829- 433371
Outoa että Trump ekana sanoutui irti ilmastosopimuksesta
kun Kaliforniaa riepottelee siitä johtuvat tuhoisat maastopalot. Hirmumyrskytkin ovat USA:ssa olleet tuhoisia.6113237Eli jos toisen hiki haisee ns. omaan nenään siedettävältä
Se kertoo hyvästä yhteensopivuudesta. Selvä! Olet mies minun. 🫵🥳523212- 913098
Sattuma ja muutama väärinkäsitys
vaikuttivat siihen millaiseksi tämä kaikki muodostui. Pienet aikanaan huomaamattomat käänteet. Seuraava näytös on jo tul322033- 361910