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

• #39668 Delila_1 veterán Laciahegyrol #39667

  Új Válasz 2018-11-26 13:45:05 #39668

  Ú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

  

  Delila_1

  veterán

  válasz Laciahegyrol #39667 üzenetére

  A füzet bezárásakor a makró változóinak értéke lenullázódik.
  Nem értem, mi köze a névadásnak az egyes értékek tárolásához.

  A lenti makróban is egy cella tartalmazza az értéket, amit beolvashatsz egy változóba, csak itt egy újonnan létrehozott tartomány egy bizonyos cellájáról van szó.

  Sub mm()
Dim valtozo As Variant
'Nevet adunk a Data lapon lévő B2:K20 tartománynak
Sheets("Data").Names.Add Name:="Tartomany", RefersToR1C1:="=Data!R2C2:R20C11"

'betesszük a valtozo-ba a megadott tartomány 2. sorában, 3. oszlopában lévő értéket
valtozo = Sheets("Data").Range("Tartomany")(2, 3)
MsgBox valtozo
End Sub

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