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
355
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
Saako kaunis ihminen parempaa kohtelua?
Onko kauniin ihmisen elämä "helpompaa" kuin tavallisen näköisen ihmisen? Olen kuullut väittämän, että kaunis ihminen saa722467En rehellisesti usko et oisit
Sekuntiakaan oikeasti mua kaivannut. Tai edes miettinyt miten mulla menee. Jotenkin todennäköisesti hyödyt tästäkin jos361799- 101654
Suomennettua: professori Jeffrey Sachs avaa Ukrainan sodan taustat luennollaan EU parlamentissa
Jeffrey Sachs on yhdysvaltalainen ekonomisti. Sachs toimii Columbian yliopiston The Earth Instituten johtajana. Aiemmin3721587Näin sinusta taas unta!
Unessa olin pakahtuneesti rakastunut sinuun. Olimme vanhassa talossa jossa oli yläkerran huoneissa pyöreät ikkunat. Pöly181552Nainen, olet jotenkin lumoava
Katselen kauneuttasi kuin kuuta, sen loistoa pimeässä. Sen kaunis valo on kaunista sekä herkkää ja lumoavaa. Olet naisel681407- 1091166
- 121128
En muuttaisi sinusta mitään
Ensin olit etäinen ja yritin pysyä tutkan alapuolella. Mutta ei silmiltäsi jää mitään huomaamatta, kuten minulla ei kuul91094- 201009