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
382
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
Vesikin maksaa, miksei hengitysilma?
Jatkuvasti itketään ettei ole rahaa mihinkään, mutta tilastojen mukaan rahaa on enemmän kuin koskaan, joten miksei asial11576Satuolennoista tarinointi ei kuulu peruskoulun tehtäviin
Opetustunteja on muutenkin käytössä vain rajallinen määrä. Eli nämä satuhommat koulun ulkopuolelle vapaaehtoisiin harras961504Lahkokasteen ja kristillisen kasteen erot
Raamatun mukaan Kristillisessä yhdessä kasteessa Jumala pesee ja puhdistaa ihmisen sydämen ja poistaa perisynnin kirouks4221051Suomalainen perheenisä vaatii Suvivirren esittämisestä hyvityksiä
Itse lapsena uskonnonopetuksesta vissiin traumoja saanut ihka suomalainen (!) perheenisä vaatii Espoon kaupungilta korva201953- 124849
Heikki Paasosen Marita-vaimo jätti tunteikkaat jäähyväiset: "Tällä kertaa me..."
Heikki Paasonen on naimisissa Marita Paasosen (os. Alatalo) kanssa ja heillä on kaksi pientä lasta. Nyt koitti aika jätt2797Kuka omistaa keltaisen vanhan aravan?
Pitäs saada rakennuksen omistajaan yhteys, rappukäytävät on siivottomassa kunnossa. Hiekkaa ja roskia rappusissa, lisäks29760Pirkanlinna yleisötapahtuma
Oli todella hyvä tilaisuus. Ja EERO. L. Aivan mahtava tyyppi. Veti rennosti ja asiallisesti. Ja yleisöltä hyviä kysymyks42751- 7724
- 60703