Új hozzászólás Aktív témák

• #50376 TillaT tag istvankeresz #50374

  Új Válasz 2023-02-02 10:42:54 #50376

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  TillaT

  tag

  válasz istvankeresz #50374 üzenetére

  Ha a cella értéke mellett más adatokra is szükséged lenne a celláról, akkor az alábbi kód is segíthet. Ez az aktív (aktívvá tett) cella adatait (cím, koordináták, érték, típus) adja vissza egy MsgBox-ban. A kódot hozzárendelheted egy billentyűkombinációhoz is és egy általad létrehozott gombhoz is.

  Sub Cellrangequery()
    Dim r As range
    Set r = Selection
    MsgBox "Range address: " & r.Address & vbNewLine & _
        "Range value: " & r.Value & vbNewLine & _
        "Range row: " & r.Row & vbNewLine & _
        "Range column: " & r.Column & vbNewLine & _
        "Range type: " & TypeName(r.Value)
End Sub

Új hozzászólás Aktív témák