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

Forumthread: Aktive Zelle dort bestimmter Bereich markieren

Aktive Zelle dort bestimmter Bereich markieren
cuugan
Moin, moin,
ich möchte der momentan aktiven zelle immer den bereich B bis H markieren, damit ich diesen über ein makro löschen kann.
so hatte ich mir das vorgestellt, jedoch ist mein code fehlerhaft.
Range("B:H").Selection.adress(0, 0).Select
Selection.ClearContents
könnt ihr mir helfen?
Gruß
Hansi
Anzeige

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

Betreff
Benutzer
Anzeige
AW: Aktive Zelle dort bestimmter Bereich markieren
09.05.2012 10:34:52
cuugan
Ergänzung:
die aktive Zelle ist z. B. A12
jetzt möchte ich über vba den inhalt B12:H12 löschen. Nur den Inhalt, nicht die Zeile
AW: Aktive Zelle dort bestimmter Bereich markieren
09.05.2012 10:44:04
Sheldon
Hallo cuugan,
so geht das:
Range(Cells(ActiveCell.Row, 2), Cells(ActiveCell.Row, 8)).ClearContents
Gruß
Sheldon
AW: Aktive Zelle dort bestimmter Bereich markieren
09.05.2012 10:38:27
MatthiasG
Hallo Hansi,

Dim z As Long
z = ActiveCell.Row
Range("B" & z & ":H" & z).ClearContents
Gruß Matthias
Anzeige
AW: Aktive Zelle dort bestimmter Bereich markieren
09.05.2012 10:50:40
cuugan
klasse, vielen Dank!
AW: Aktive Zelle dort bestimmter Bereich markieren
09.05.2012 10:52:52
MatthiasG
Hallo Hansi,
Sheldons Lösung funktioniert genauso.
Gruß Matthias

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Aktive Zelle in Excel hervorheben und Inhalte löschen


Schritt-für-Schritt-Anleitung

Um die aktive Zelle in Excel zu verwenden, um einen bestimmten Bereich zu markieren und dessen Inhalte zu löschen, kannst du die folgenden Schritte befolgen:

  1. Öffne den VBA-Editor: Drücke ALT + F11 in Excel, um den VBA-Editor zu öffnen.

  2. Füge ein neues Modul hinzu: Klicke auf Einfügen -> Modul.

  3. Kopiere den folgenden VBA-Code in das Modul:

    Sub ZelleMarkierenUndLöschen()
       Dim z As Long
       z = ActiveCell.Row
       Range("B" & z & ":H" & z).ClearContents
    End Sub
  4. Schließe den VBA-Editor und gehe zurück zu Excel.

  5. Führe das Makro aus: Drücke ALT + F8, wähle ZelleMarkierenUndLöschen und klicke auf Ausführen.

Jetzt wird der Inhalt der Zellen von B bis H in der Zeile der aktiven Zelle gelöscht.


Häufige Fehler und Lösungen

  • Fehler: "Typen sind nicht kompatibel"
    Lösung: Stelle sicher, dass die aktive Zelle eine gültige Zeile hat. Wenn du versuchst, eine Zeile zu löschen, die nicht existiert, tritt dieser Fehler auf.

  • Fehler: "Methoden- oder Datenmitglied nicht gefunden"
    Lösung: Überprüfe, ob du den Code korrekt eingegeben hast, insbesondere die Syntax der Range-Funktion.


Alternative Methoden

Wenn du eine andere Methode bevorzugst, kannst du auch die folgende Zeile verwenden, die einfacher ist:

Range(Cells(ActiveCell.Row, 2), Cells(ActiveCell.Row, 8)).ClearContents

Diese Variante verwendet Cells, um auf die aktive Zeile zuzugreifen und den Zellbereich zu markieren.


Praktische Beispiele

Hier sind einige praktische Beispiele, die dir helfen, die aktive Zelle in Excel zu verwenden:

  1. Inhalte eines bestimmten Bereichs löschen: Verwende den vorherigen VBA-Code, um beispielsweise die Inhalte von B12 bis H12 zu löschen, wenn die aktive Zelle A12 ist.
  2. Aktive Zelle hervorheben: Du kannst die aktive Zelle auch visuell hervorheben, indem du die Hintergrundfarbe änderst:

    ActiveCell.Interior.Color = RGB(255, 255, 0) ' Gelb

Tipps für Profis

  • Automatisierung: Integriere diesen Code in deine Arbeitsmappe, um schnell auf die Bereiche zugreifen zu können, die du häufig löschen musst.
  • Fehlerbehandlung: Füge Fehlerbehandlungsroutinen hinzu, um sicherzustellen, dass der Code auch bei unerwarteten Eingaben reibungslos funktioniert.

FAQ: Häufige Fragen

1. Wie kann ich die aktive Zelle in Excel hervorheben?
Du kannst die aktive Zelle hervorheben, indem du den Hintergrund oder die Schriftfarbe änderst. Beispiel:

ActiveCell.Interior.Color = RGB(255, 0, 0) ' Rot

2. Funktioniert dieser Code in jeder Excel-Version?
Ja, der VBA-Code zur Arbeit mit aktiven Zellen sollte in allen modernen Excel-Versionen funktionieren, die VBA unterstützen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige