Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

einer Variable Wert zuweisen (.Value)

Forumthread: einer Variable Wert zuweisen (.Value)

einer Variable Wert zuweisen (.Value)
26.07.2003 18:45:32
Matthias C.
Hallo Excelfreunde,
kann mir bei diesem Makro jemand helfen? Ich möchte aus der aktuellen Mappe die Spalte A bis zur Zelle mit dem Eintrag "new" in die neu geöffnete Mappe kopieren und komme an dieser Stelle einfach nicht weiter. Wie kann ich der Variable "wert" den Wert "new" zuweisen, damit auch immer nur bis zu dieser Zeile kopiert wird?

Sub speichern()
Dim sFile As String, sPath As String, wert As String
Dim rngSource As Range, rngTarget As Range
sPath = "C:\Excel" & "\"
sFile = Worksheets(1).Range("d2").Value
sFile = Format(CDate(sFile), "dd.mm.yyyy") & ".xls"
wert = ???
ActiveWorkbook.SaveAs sPath & sFile
Workbooks.Add Template:="C:\Excel\Schwarza.xlt"
Worksheets(1).Range("B3") = sFile
Set rngSource = Workbooks(sFile).Worksheets(1).Range("A22:wert")
Set rngTarget = ActiveWorkbook.Worksheets(1).Range("A22:wert")
rngSource.Copy rngTarget
End Sub

Vielen Dank für eure Mühe, würde mich über eine Lösung sehr freuen.
MfG Matthias
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: einer Variable Wert zuweisen (.Value)
26.07.2003 19:00:18
Mike E.
Hallo Matthias,
so ermittelst du, ob in Spalte 1 "new" steht und gleichzeitig wird der Range von Zeile 1 bis zur gesuchten selektiert.

Sub Test()
Dim Wert As Integer
For Wert = 1 To 600
If Sheets(1).Cells(Wert, 1).Value = "new" Then Sheets(1).Range(Cells(1, 1), Cells(Wert, 1)).Select: Exit Sub
Next
End Sub

Gruß
Mike

Anzeige
AW: einer Variable Wert zuweisen (.Value)
26.07.2003 20:05:13
Matthias C.
Hallo Mike,
ich werde es mit dieser If-Anweisung machen, einen anderen Weg sehe ich dafür auch nicht. Danke dir!
MfG Matthias

;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Wert einer Variable in Excel VBA zuweisen


Schritt-für-Schritt-Anleitung

  1. VBA-Editor öffnen: Drücke ALT + F11, um den VBA-Editor in Excel zu öffnen.
  2. Modul erstellen: Klicke mit der rechten Maustaste auf dein Projekt im Projektfenster und wähle Einfügen > Modul.
  3. Variable deklarieren: Verwende die Anweisung Dim, um eine Variable zu deklarieren. Beispiel:
    Dim wert As String
  4. Wert zuweisen: Um einer Variablen einen Wert zuzuweisen, verwende die Zuweisungsanweisung =. Beispiel:
    wert = "new"
  5. Verwendung der Variable: Du kannst die Variable jetzt in deinem Code verwenden, z.B. um Bereiche zu definieren:
    Set rngSource = Worksheets(1).Range("A1:A" & wert)

Häufige Fehler und Lösungen

  • Fehler: Ungültiger Zellbereich
    Lösung: Stelle sicher, dass die Variable, die du für den Zellbereich verwendest, korrekt ist. Zum Beispiel, wenn wert eine Zeilennummer sein soll, sollte sie als Integer deklariert werden.

  • Fehler: Variable nicht definiert
    Lösung: Überprüfe, ob du deine Variable mit Dim korrekt deklariert hast.


Alternative Methoden

Eine Alternative zur Zuweisung eines Wertes an eine Variable könnte die Verwendung von Excel-Funktionen direkt im VBA-Code sein. Zum Beispiel kannst du den Wert in einer Zelle direkt zuweisen:

wert = Sheets(1).Cells(1, 1).Value

Das ist nützlich, wenn du den Wert dynamisch aus einer Zelle übernehmen möchtest.


Praktische Beispiele

Hier ist ein Beispiel, wie du eine globale Variable in einem VBA-Modul definieren und ihr einen Wert zuweisen kannst:

Public wert As String

Sub Beispiel()
    wert = "new"
    MsgBox "Der Wert der Variable ist: " & wert
End Sub

In diesem Fall bleibt die Variable wert so lange im Speicher, bis die Excel-Anwendung geschlossen wird.


Tipps für Profis

  • Globale Variablen: Wenn du eine globale Variable benötigst, erwäge die Verwendung von Public statt Dim. Dadurch ist die Variable in allen Modulen verfügbar.
  • Typen der Variablen: Achte darauf, den richtigen Datentyp für deine Variablen zu wählen. Zum Beispiel, eine Integer-Variable für Zeilennummern und eine String-Variable für Textwerte.
  • Fehlerbehandlung: Implementiere eine Fehlerbehandlung, um unerwartete Fehler während der Ausführung deines Codes abzufangen.

FAQ: Häufige Fragen

1. Wie kann ich einer vba globalen Variable einen Wert zuweisen?
Du kannst dies tun, indem du die Variable als Public deklarierst und dann in einem Sub oder Function einen Wert zuweist.

2. Was passiert, wenn ich eine nicht definierte Variable verwende?
Excel VBA gibt einen Fehler zurück, dass die Variable nicht definiert ist. Stelle sicher, dass alle Variablen korrekt deklariert sind.

3. Wie kann ich eine vba Variable definieren und ihr einen Wert zuweisen?
Du definierst eine Variable mit Dim und weist ihr einen Wert mit der Zuweisung = zu. Beispiel: Dim wert As String gefolgt von wert = "new".

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige