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

In die nächste Spalte springen

Forumthread: In die nächste Spalte springen

In die nächste Spalte springen
13.05.2004 12:59:21
Tobias
Hllo
Ich habe eine Tabelle, in der die Tage eines Monats horizontal in Zeile 12 nebeneinander stehen (in den Spalten G bis AK). Zwei Zeilen dieser Tabelle werden mittels einer VBA Funktion gefüllt. Dies geschieht nacheinander mittels einer loop Funktion.
Die erste Zelle (konkret G14) wird gefüllt (wieso und womit ist nicht das Thema, das funktioniert schon). Danach soll dann mittels besagter loop funktion in die nächste Zelle (also H14) gesprungen werden und dieselbe Operation wie der vorherigen Zelle durchgeführt werden. Das ganze dann bis zum Monatsende, also AK14.
Nun zu meinem Problem: Die Loop Funktion und alles dazugehörige (Zellen ausfüllen usw.) funktioniert im Prinzip schon. Ich weiss nur nicht, wie ich VBA dazu bekommen kann, als Teil des Loops in die nächste Spalte zu hüpfen. Eine Zeilenzahl könnte ich ja einfach +1 rechnen, aber bei Spalten geht das nicht.
Oder doch, und ich stehe nur auf dem Schlauch?
vielen Dank im voraus
Tobias
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: In die nächste Spalte springen
13.05.2004 13:02:51
Matthias
Hallo Tobia,
ich glaube, du stehst auf dem Schlauch ;-)
Aber ohne Code kann ich Dir auch nicht weiterhelfen.
Gruß Matthias
AW: In die nächste Spalte springen
xXx
Hallo,
warum willst du springen? Es reicht doch, wenn du die Zellen füllst, oder nicht?
For i= 8 to Columns("AK").column
Cells(14,i)=Range("G14")
Next i
Auf Select sollte wo immer es geht verzichtet werden!
Gruß aus'm Pott
Udo
http://www.excelerator.de
Anzeige
hat sich erledigt, danke trotzdem k/t
Tobias
kein text
;
Anzeige
Anzeige

Infobox / Tutorial

In die nächste Spalte springen in Excel mit VBA


Schritt-für-Schritt-Anleitung

Um in Excel mittels VBA in die nächste Spalte zu springen, kannst Du eine einfache Schleife verwenden. Hier ist eine Schritt-für-Schritt-Anleitung:

  1. Öffne den VBA-Editor: Drücke ALT + F11, um den VBA-Editor zu öffnen.
  2. Füge ein neues Modul hinzu: Klicke mit der rechten Maustaste auf „VBAProject (DeineArbeitsmappe)“, wähle „Einfügen“ und dann „Modul“.
  3. Schreibe den Code:
    Sub FülleZellen()
       Dim i As Integer
       For i = 7 To 37 ' G ist Spalte 7 und AK ist Spalte 37
           Cells(14, i + 1).Value = Cells(14, 7).Value ' Füllt jede Zelle von G14 bis AK14
       Next i
    End Sub
  4. Führe das Makro aus: Drücke F5, um das Makro auszuführen.

Häufige Fehler und Lösungen

  • Fehler: "Typenübereinstimmung"
    Lösung: Stelle sicher, dass die Zellen, die Du füllst, korrekt referenziert sind.

  • Fehler: "Index außerhalb des gültigen Bereichs"
    Lösung: Überprüfe, dass Deine Schleife die richtigen Spalten indiziert.

  • Fehler: "Zugriff verweigert"
    Lösung: Stelle sicher, dass die Excel-Datei nicht schreibgeschützt ist.


Alternative Methoden

Falls Du lieber keine VBA verwenden möchtest, gibt es auch alternative Methoden:

  • Formeln: Du kannst Formeln verwenden, um Werte in die nächsten Spalten zu kopieren. Zum Beispiel:

    =G14

    Kopiere diese Formel von G14 bis AK14.

  • Drag & Drop: Setze den Wert in G14 und ziehe das kleine Quadrat in der unteren rechten Ecke der Zelle bis zur gewünschten Spalte.


Praktische Beispiele

Hier sind einige praktische Beispiele, wie Du die VBA-Funktion nutzen kannst:

  1. Füllen von Daten: Wenn Du Daten in G14 hast und sie in H14, I14, ... bis AK14 kopieren möchtest.
  2. Dynamische Daten: Wenn sich der Inhalt in G14 ändert, wird automatisch alles aktualisiert, wenn Du den Code ausführst.

Tipps für Profis

  • Vermeide Select: Versuche, Select oder Activate zu vermeiden, da sie den Code verlangsamen können.
  • Fehlerbehandlung einfügen: Nutze On Error Resume Next, um sicherzustellen, dass der Code auch bei Fehlern weiterläuft.
  • Verwende Konstanten: Definiere Spalten- oder Zeilenanzahlen als Konstanten, um Deinen Code flexibler zu gestalten.

FAQ: Häufige Fragen

1. Wie kann ich die Schleife anpassen, um nur bestimmte Zellen zu füllen?
Du kannst die Schleife so anpassen, dass sie nur bestimmte Indizes durchläuft. Z.B. For i = 7 To 20 würde nur bis zur Spalte T füllen.

2. Funktioniert dieser Code in allen Excel-Versionen?
Ja, der Code sollte in Excel-Versionen ab 2007 bis zur neuesten Version funktionieren. Achte darauf, dass die VBA-Funktionalität aktiviert ist.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige