Microsoft Excel

Herbers Excel/VBA-Archiv

Zellen mit Namen versehen

Betrifft: Zellen mit Namen versehen von: Heiner
Geschrieben am: 28.08.2004 22:15:46

Hallo zusammen,

ich möchte die Zellen von B2 bis B 51 mit Namen versehen [Eingabe 1] bis [Eingabe 50].
Frage: lässt sich das mit VBA automatisieren?

Danke für Eure Ideen

Heiner

  


Betrifft: AW: Zellen mit Namen versehen von: Andreas Emmert
Geschrieben am: 28.08.2004 22:52:24

Geht mit VBA via

ActiveWorkbook.Names.Add Name:="DeinName", RefersToR1C1:= "=Blattname!R2C2:R51C2"

Hilft das weiter?

Grüße

Andreas


  


Betrifft: AW: Zellen mit Namen versehen von: mealone
Geschrieben am: 28.08.2004 23:13:28

hallo heiner,

For SetVarName = 2 To 51 Step 1
ActiveWorkbook.Names.Add Name:=Cells(SetVarName, 2).Value, _
RefersTo:=Cells(SetVarName, 2)
Next SetVarName

dieser code vergibt namen die in spalte b in den zeilen 2 bis 51 stehen an die zelle selbst
also wert in b2 ist zb "name1" dann hat diese zelle danach den namen "name1"
!!! da ist keine fehlerprüfung bei die werte in den zellen müssen also den konventionen entsprechen!!!

gruss mealone


 

Beiträge aus den Excel-Beispielen zum Thema "Zellen mit Namen versehen"