Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
876to880
876to880
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zellen einen Namen zuweisen

Forumthread: Zellen einen Namen zuweisen

Zellen einen Namen zuweisen
19.06.2007 10:33:00
Andre´
Hallo alle zusammen,
Hat jemand eine Idee, wie ich am schnellsten einen Spaltenbereich einen Namen zuweisen kann. In meinem Fall sind es 194 Spalten, wo ich manuell markieren und einen Namen zuweisen müsste.
Folgende Zellen möchte ich mit dem Spaltennamen versehen:
A6:A750 = A
B6:B750 = B
C6:C750 = C
.
.
.
GL6:GL 750= GL
Ich hoffe mir kann jemand helfen.
Danke im Voraus
MFG Andre

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellen einen Namen zuweisen
19.06.2007 10:55:00
Renee
Mazwara Andre,
Dieser Code in ein Modul:

Sub AddNames()
Const iColMax = 194
Const iRowMax = 750
Dim iColCnt As Integer
Dim sName As String
Dim sReferTo As String
On Error Resume Next
For iColCnt = 30 To iColMax
sName = ActiveSheet.Cells(1, iColCnt).Address(True, False)
sName = Left$(sName, InStr(sName, "$") - 1)
sRefersTo = "=" & ActiveSheet.Name & "!$" & sName & "$1:$" & sName & "$" & iRowMax
ThisWorkbook.Names.Add Name:=sName, RefersTo:=sRefersTo
Next iColCnt
End Sub


Greetz Renee

Anzeige
AW: Zellen einen Namen zuweisen
19.06.2007 11:31:00
Andre´
Hallo Renee,
Danke!Makro funzt prima
Mir ist aufgefallen, dass generell für die Spalte S für einen gewissen Zellbereich als Name kein S akzeptiert wird. Hat dafür jemand eine Antwort.
MFG Andre

AW: Zellen einen Namen zuweisen
19.06.2007 17:09:00
Renee
Mazwara Andre,
S und Z sind im deutschen Excel reservierte Worte für Spalte und Zeile.
Im englischen "R" und "C".
Greetz Renee

Anzeige
AW: Zellen einen Namen zuweisen
19.06.2007 14:28:00
Peter
Hallo Andre,
warum der Name "S" nicht akzeptiert wird, weiß ich auch nict, er wird wohl irgendwo in VBA reserviert sein.
Meine Version deiner Frage sieht so aus:

Public Sub NameWieSpalte()
Dim iSpalte  As Integer
Dim sName    As String
On Error GoTo Fehler_Ausgang
For iSpalte = 1 To 194
sName = Replace(Cells(1, iSpalte).Address(0, 0), 1, "")
With Range(sName & "6:" & sName & "750")
ActiveWorkbook.Names.Add Name:=sName, RefersToR1C1:= _
"=Tabelle2!R6C" & iSpalte & ":R750C" & iSpalte & ""
End With
Next iSpalte
Weiter:
Exit Sub
Fehler_Ausgang:
MsgBox "einen Spalten-Namen """ & sName & """ mag VBA nicht!", _
48, "   Hinweis für " & Application.UserName
GoTo Weiter
End Sub


Gruß Peter

Anzeige
AW: Zellen einen Namen zuweisen:-)DANKE
19.06.2007 19:39:00
Andre´
Hallo
vielen DANK für Eure Hilfestellung. Wenn man es mit dem "S" berücksichtigt, dann kann ja für solch einen Fall etwas anderes vergeben werden!
MFG Andre
;

Forumthreads zu verwandten Themen

VBA - Zelle kopieren bis Wert einer Zelle null ist
Schulze

Halli Hallo,
ich bin ziemlicher Neuling in VBA. Daher würde ich euch bitten mir bei meiner Fragestellung zu helfen und zwar wie folgt: Ich möchte aus einer Tabelle aller Zellen kopieren, bis der Wert einer Zelle 0 annimmt. Diesen bestimten Bereich möchte ich in einer neuen Datei abspeichern...
19.08.2008 08:39:35
Thread-ID: 1002782
17 Beiträge
Wert aus Zelle holen für VBA
Oliver

Hallo eine kleine Frage,
wollte folgendes umsetzen, ein Benutzer fügt in der Excelobelfläche im ersten Blatt eine Zahl ein. Diese soll jetzt wie folgt verwendet werden:
falls ... größer als dem Zellinhalt, dann ...
meine Idee:
Dim Wert As Integer
Wert = cells(20, 2)
If.....
25.09.2008 10:06:31
Thread-ID: 1012241
6 Beiträge
VBA: Gültigkeit für eine Zelle zuweisen
André

Moin zusammen,
ich möchte per VBA einer Zelle eine Gültigkeit zuweisen, und zwar eine Liste von Werten, die dann per Dropdown ausgewählt werden können.
Um den hierzu notwendigen Code zu erhalten, habe ich die Gültigkeit manuell zugewiesen und per Makrorekorder aufzeichnen lassen. Dabei...
22.03.2010 14:10:36
Thread-ID: 1147568
3 Beiträge
Anzeige
einer anderen Zelle einen wert zu weisen
elmar.zeht-online.de

=Wenn(a1=1;b1=55;c1=44)
das funktioniert nicht
kann man einer anderen Zelle ohne VBA einen wert zuweisen ?
16.09.2010 12:57:11
Thread-ID: 1178071
8 Beiträge
Range einen Zellwert zuweisen
Frank

Hallo liebes Forum!!!
In VBA schreibt man öfters z.B. Range("A2") oder so! Wie kann ich aber nun anstelle der 2 einen Zellwert verwenden. Beispiel: Ich schreibe in E1 eine 72 dann soll Range("A72") herauskommen! Wie mussich nun Range("A2") umschreiben?
Danke euch im Vorraus!!!
Gruß...
24.11.2010 09:11:00
Thread-ID: 1188469
4 Beiträge
Anzeige
Variablen Werte zuweisen
Andreas

Hallo,
Ich habe 26 Textboxen (Textbox1 ... Textbox26) und möchte den Variablen a bis z die Werte zuweisen.
Also a = textbox1.text , b= textbox2.text ...
kann ich das auch mit einer schleife realisieren? im moment mach ich das alles immer einzeln, aber wenns dann mal 50 Variablen sin...
15.12.2010 22:17:56
Thread-ID: 1191711
5 Beiträge
VBA zu Tabelle - Variablenwerte kommen nicht an
Perry

Hallo!
Mein Problem stellt sich folgendermaßen dar:
Habe eine Arbeitsmappe mit mehreren Worksheets - das erste ist eine Übersicht, die zusammenfassend angeben soll, wie oft bestimmte Ausdrücke in den nachfolgenden Worksheets vorkommen.
Das Zusammenzählen, wie oft die gesuchten Ausdr...
03.07.2011 19:12:26
Thread-ID: 1220730
2 Beiträge
Werte in einen Code aus Zellen eintragen
Golem

Hallo Excel-Fachleute,
ich habe hier einen Code vom Sepp.
Hiermit kann ich Starzeile und Endzeile einer Spalte vorgeben und durch das Ausführen
werden die restlichen Zeilen in der Spalte gelöscht.
Hiermit kann ich bestimmte Zeilen vor dem Startdatum, oder auch Zeilen nach meinen...
20.06.2012 21:51:31
Thread-ID: 1268214
6 Beiträge
zu kopierenden Zellen einen festen Wert zuweisen
Rene

Hallo liebes Forum,
mein Problem ist folgendes, ich habe 4 Zellen wie im Beispiel angezeigt, von der die Zelle M6 immer den Wert 1 wiedergeben soll, M9 soll den Wert 2 haben, M12 soll 3 und M15 4 haben.
Diese 4 Zellen werden je nach Bedarf kopiert, z.B. in die Zellen F6 oder F9, F12 0de...
14.10.2012 13:27:18
Thread-ID: 1281955
6 Beiträge
Anzeige
Berechnung Min-Max Wert der letzten 3 Zellen - VBA
Daniela

Hallo
Ich würde gern in Excel eine Berechnung mit VBA des Minimum- und Maximumwertes
der jeweils letzten 3 Zellen berechnen. Wenn ein neuer Wert hinzugefügt wird, sollen
wieder automatisch die letzten 3 Zellen für die Berechnung berücksichtigt werden.
Habe das in der Exceltabel...
16.01.2013 22:09:02
Thread-ID: 1294708
8 Beiträge
Wert aus Zelle in VBA nutzen
Rudolf

Hallo,
ich stehe mal wieder voll bei VBA aufn schlauch, und würde mich über hilfe sehr freuen.
ich habe einen VBA Code :
Sub Test_Daten_Lesen() Dim Textdatei As String, var1 As String, var2 As String, var3 As String Textdatei = ("\\SERVER-XP\User_Sicherung\test.txt") Open Textdate...
04.03.2013 10:45:08
Thread-ID: 1302114
3 Beiträge
VBA Zellen aus Tabelle nach bestimmten Werten
Jörg

Hallo,
gegeben ist ein Tabellenblatt Z mit einer großen Anzahl von Produktbezeichnungen in Spalte D, den dazugehörigen Artikelnummern in Spalte E. Spalte F differenziert die Produkte nach unterschiedlichen Versionen.
Aus einem Userform heraus soll nun an Hand der Produktbezeichnung die...
21.04.2013 18:10:03
Thread-ID: 1309708
6 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige