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

Aktive Zelle 3 Spalten weiter in 3. Zeile

Forumthread: Aktive Zelle 3 Spalten weiter in 3. Zeile

Aktive Zelle 3 Spalten weiter in 3. Zeile
Karsten
Hallo,
ich möchte per VBA die Aktive Zelle 3 Spalten weiter in die 3. Zeile setzen.
Kann mir jemand mit dem entsprechenden Code weiterhelfen?
Besten Dank.
Gruß
Karsten
Anzeige
AW: Aktive Zelle 3 Spalten weiter in 3. Zeile
26.12.2011 16:51:10
Hajo_Zi
Hallo Karsten.
ActiveCell.Offset(0, 3) = 123

AW: Aktive Zelle 3 Spalten weiter in 3. Zeile
26.12.2011 17:01:08
Karsten
Hallo Hajo,
danke, aber ich möchte da nichts reingeschrieben haben, sondern, dass es die neue akt. Zelle wird.
Nu hab ich gedacht es geht so:
ActiveCell.Offset(0, 3) = ActiveCell
aber da stimmt was nicht. Wie muss das richtig sein?
Gruß
Karsten
Anzeige
AW: Aktive Zelle 3 Spalten weiter in 3. Zeile
26.12.2011 17:04:31
Hajo_Zi
Hallo Karsten,
in VBA kann zu 99,9% auf select usw. verzichtet werden. ActiveCell.Offset(0, 3).select
Gruß Hajo
AW: Aktive Zelle 3 Spalten weiter in 3. Zeile
26.12.2011 17:14:59
Karsten
Hallo Hajo,
sicher ich weiß, aber danke für's "select".
Meine Ausgangsfrage war doch noch etwas anders:
... in die 3. Zeile setzen.
Quasi so gedacht - was aber nicht geht.
ActiveCell.Offset(3. Row, 3 Columns weiter).Select
Wie muß es richtig aussehen?
Gruß
Karsten
Anzeige
AW: Aktive Zelle 3 Spalten weiter in 3. Zeile
26.12.2011 17:17:01
Hajo_Zi
Hallo Karsten,
ich hätte (3,3) geschrieben.
Gruß Hajo
AW: Aktive Zelle 3 Spalten weiter in 3. Zeile
26.12.2011 17:56:46
Karsten
Hallo Hajo,
ne, ne. Das ist das, was ich brauche. Kannst es ja noch verschönern. Danke.
Gruß
Karsten
ActiveCell(1, 4).Select
Selection.End(xlUp).Select
With ActiveCell
Range(.Offset(2, 0), .Offset(2, 0)).Select
End With
Anzeige
AW: Aktive Zelle 3 Spalten weiter in 3. Zeile
26.12.2011 18:07:39
Hajo_Zi
Hallo karsten,
Nein das kann ich nicht, da Du nicht auf select verzichten willst.
Gruß Hajo
AW: Aktive Zelle 3 Spalten weiter in 3. Zeile
26.12.2011 18:07:39
Hajo_Zi
Hallo karsten,
Nein das kann ich nicht, da Du nicht auf select verzichten willst.
Gruß Hajo
Anzeige
AW: Aktive Zelle 3 Spalten weiter in 3. Zeile
26.12.2011 18:11:33
hary
Hallo Karsten
das hier?

Cells(3, ActiveCell.Column + 3).Select

gruss hary
AW: Aktive Zelle 3 Spalten weiter in 3. Zeile
26.12.2011 18:15:28
Karsten
Hallo Hary,
ja, danke!
Gruß Karsten
Cells(3,... ) ist doch nicht ActiveCell-oder? oT
26.12.2011 19:40:58
robert
Anzeige
Nöö, aber Zeile(3) iss es ;o) oT
26.12.2011 20:25:14
Matthias
AW: Aktive Zelle 3 Spalten weiter in 3. Zeile
26.12.2011 17:06:09
Karsten
irgendwie passiert - ignorieren.
AW: Aktive Zelle 3 Spalten weiter in 3. Zeile
26.12.2011 17:11:12
Hajo_Zi
Hallo karsten,
was soll mir das sagen? Der Code macht genau das was gewünscht.
Gruß Hajo
Anzeige
hat Karsten keine Hilfe auf dem Computer?
26.12.2011 17:36:16
robert
OT: Schö2WeihnAb, Robert! owT
26.12.2011 17:52:17
Luc:-?
Luc :-?
Danke, ebensolchen ;-)) oT
26.12.2011 19:30:59
robert
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Aktive Zelle in Excel 3 Spalten weiter in die 3. Zeile setzen


Schritt-für-Schritt-Anleitung

Um die aktive Zelle in Excel 3 Spalten weiter in die 3. Zeile zu setzen, benötigst du den folgenden VBA-Code:

ActiveCell.Offset(3, 3).Select
  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
  2. Füge ein neues Modul hinzu, indem du im Menü auf Einfügen > Modul klickst.
  3. Kopiere den obigen Code in das Modul.
  4. Schließe den VBA-Editor und gehe zurück zu Excel.
  5. Wähle eine Zelle aus und führe das Makro aus, um die aktive Zelle entsprechend zu verschieben.

Häufige Fehler und Lösungen

Fehler: „Das Makro funktioniert nicht wie gewünscht.“

Lösung: Stelle sicher, dass du den Code korrekt eingegeben hast. Verwende ActiveCell.Offset(3, 3).Select, um die aktive Zelle in die 3. Zeile und 3 Spalten weiter zu verschieben.

Fehler: „Ich kann die Zielzelle nicht erreichen.“

Lösung: Prüfe, ob deine aktuelle Zelle nicht zu nah am unteren Rand des Arbeitsblatts ist (z.B. bei Zeile 1 oder 2), da der Offset sonst möglicherweise außerhalb des gültigen Bereichs führt.


Alternative Methoden

Eine alternative Methode, um die aktive Zelle in die 3. Zeile und 3 Spalten weiter zu setzen, ist die Verwendung der Cells-Eigenschaft:

Cells(3, ActiveCell.Column + 3).Select

Hierbei wird die Zelle in der 3. Zeile und der Spalte, die 3 Spalten rechts von der aktuellen Zelle liegt, ausgewählt.


Praktische Beispiele

  1. Beispiel 1: Einfache Verschiebung

    Sub VerschiebeZelle()
       ActiveCell.Offset(3, 3).Select
    End Sub
  2. Beispiel 2: Kombination mit Bedingungen

    Sub BedingteVerschiebung()
       If ActiveCell.Value <> "" Then
           ActiveCell.Offset(3, 3).Select
       End If
    End Sub

Diese Beispiele zeigen, wie du die aktive Zelle in Excel mithilfe von VBA anpassen kannst.


Tipps für Profis

  • Vermeide die Verwendung von Select, wenn es nicht notwendig ist. Dies verbessert die Ausführungsgeschwindigkeit deines Codes.
  • Nutze With-Anweisungen, um den Code lesbarer und effizienter zu gestalten.
  • Experimentiere mit der Range-Eigenschaft, um komplexere Zellreferenzen zu erstellen.

FAQ: Häufige Fragen

1. Wie kann ich die aktive Zelle ohne VBA ändern? Du kannst die Zelle manuell auswählen und die Pfeiltasten verwenden. Oder du kannst eine Formel verwenden, um bestimmte Zellwerte dynamisch zu ändern.

2. Kann ich diese Methode in allen Excel-Versionen verwenden? Ja, die VBA-Methoden zur Zellbearbeitung sind in den meisten modernen Excel-Versionen verfügbar, solange sie VBA unterstützen. Achte darauf, die richtige Excel-Version zu verwenden, die VBA-Code ausführen kann.

3. Was ist der Unterschied zwischen Offset und Cells? Offset verschiebt die Auswahl relativ zur aktuellen Zelle, während Cells eine direkte Referenz auf die Zelle basierend auf Zeilen- und Spaltennummern bietet.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige