Kohdistin palaamaan makron suorittamista edeltävään soluun

Aloittelija...

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?

2

382

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • 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

    1. Vesikin maksaa, miksei hengitysilma?

      Jatkuvasti itketään ettei ole rahaa mihinkään, mutta tilastojen mukaan rahaa on enemmän kuin koskaan, joten miksei asial
      Maailman menoa
      1
      1576
    2. Satuolennoista tarinointi ei kuulu peruskoulun tehtäviin

      Opetustunteja on muutenkin käytössä vain rajallinen määrä. Eli nämä satuhommat koulun ulkopuolelle vapaaehtoisiin harras
      Maailman menoa
      96
      1504
    3. Lahkokasteen ja kristillisen kasteen erot

      Raamatun mukaan Kristillisessä yhdessä kasteessa Jumala pesee ja puhdistaa ihmisen sydämen ja poistaa perisynnin kirouks
      Kaste
      422
      1051
    4. Suomalainen perheenisä vaatii Suvivirren esittämisestä hyvityksiä

      Itse lapsena uskonnonopetuksesta vissiin traumoja saanut ihka suomalainen (!) perheenisä vaatii Espoon kaupungilta korva
      Maailman menoa
      201
      953
    5. Mitä haluaisit

      Tehdä kaivattusi kanssa?
      Ikävä
      124
      849
    6. 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ätt
      Suomalaiset julkkikset
      2
      797
    7. Kuka omistaa keltaisen vanhan aravan?

      Pitäs saada rakennuksen omistajaan yhteys, rappukäytävät on siivottomassa kunnossa. Hiekkaa ja roskia rappusissa, lisäks
      Haapavesi
      29
      760
    8. Pirkanlinna yleisötapahtuma

      Oli todella hyvä tilaisuus. Ja EERO. L. Aivan mahtava tyyppi. Veti rennosti ja asiallisesti. Ja yleisöltä hyviä kysymyks
      Ähtäri
      42
      751
    9. Känsäkoura ja hotelli

      Tietoa kuka ostanut?
      Kuhmo
      7
      724
    10. Nostetaanko nainen kissa pöydälle?

      Ja selvitetään nämä tunteet?
      Ikävä
      60
      703
    Aihe