Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
716to720
716to720
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zelle aktivieren

Forumthread: Zelle aktivieren

Zelle aktivieren
16.01.2006 08:30:55
fritz
Kann mir wer weiterhelfen
Mit welchem code kann ich, wenn ich z.B die Zeile 1 komplett markiert habe in eine bestimmte Zelle zb C1 springen. Möchte aber nicht Range C1 verwenden.
und eine Zweite frage gibts einen code mit dem ich von einem tabellenblatt in das zuletzt verwendete tabellenblatt in der selben arbeitsmappe zurückkehern kann.
Danke!!!!!!!!!!!!1
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Zelle aktivieren
16.01.2006 08:57:20
Heiko
Hallo Fritz,
zur 2. Frage: Dies in DieseArbeitsmappe der Datei.
Option Explicit
Public strLetztesSheet As String

Private Sub Workbook_Sheetdeactivate(ByVal Sh As Object)
strLetztesSheet = Sh.Name
End Sub

Sub LetztesSheetAufrufen()
' Dieses Makro aufrufen um auf das letzte Sheet zu kommen,
' z.B. über einen Button, ne eigne Symbolleiste ...
Worksheets(strLetztesSheet).Activate
End Sub
Zur 1. Frage, springen zu C1 von A1 aus.
Sub testZelleaktivieren()
' 1. Möglickeit:
ActiveSheet.Range("C1").Select
' 2.Möglichkeit:
ActiveSheet.Cells(1, 3).Select
' 3. Möglichkeit wenn du IMMER von A1 kommst.
ActiveCell.Offset(0, 3).Select
End Sub
Gruß Heiko
PS: Rückmeldung wäre nett !
Anzeige
AW: Zelle aktivieren
16.01.2006 09:04:52
WernerB.
Hallo Fritz,
zu 1.) Zeile 1 bleibt markiert; Zelle C1 wird aktiviert:

Sub Fritz()
Rows(1).Select
Cells(1, 3).Activate
End Sub

Viel Erfolg wünscht
WernerB.
P.S.: Dieses Forum lebt auch von den Rückmeldungen der Fragesteller an die Antworter !
Anzeige
AW: Zelle aktivieren
16.01.2006 16:07:04
Frank
Danke für die Info erstes problem konnte ich lösen.
aber ich schaffe es nicht auf das zuletzt benutzte tabellenblatt zurückzukommen?
AW: Zelle aktivieren
16.01.2006 18:13:33
Heiko
Hallo Fritz, Frank oder wie auch immer,
kannst du dich mal auf einen Namen einigen:
Wie ich schon im ersten Thread gepostet habe, diesen Ganzen Code in DieseArbeitsmappe der entsprechenenden Mappe.
Option Explicit
Public strLetztesSheet As String

Private Sub Workbook_Sheetdeactivate(ByVal Sh As Object)
strLetztesSheet = Sh.Name
End Sub

Sub LetztesSheetAufrufen()
' Dieses Makro aufrufen um auf das letzte Sheet zu kommen,
' z.B. über einen Button, ne eigne Symbolleiste, als Makro über ALT + F8 ...
Worksheets(strLetztesSheet).Activate
End Sub
Gruß Heiko
PS: Rückmeldung wäre nett
Anzeige
AW: Zelle aktivieren
16.01.2006 22:22:40
Fritz
Danke Heiko funktioniert!
Schönen Abend noch
;

Forumthreads zu verwandten Themen

Wert mit VBA suchen und Zelle aktivieren
Nico

Moin
Ich habe eine Abrechnungsdatei und folgendes Problem
In einem Tabellenblatt werden Informationen wie Firmenname und Co. eingetragen.
In der letzten Spalte dieses Blatte möchte ich gerne das Datum per VBA eintragen lassen, an dem ich die Rechnungsnummer über mein Abrechnungstabe...
16.02.2009 16:07:00
Thread-ID: 1051203
2 Beiträge
VBA verschiedene Zellen auswählen und ausgeben
Roger

Hallo zusammen
Ich hab folgenden VBA Code um Daten von Excel in Word auszugeben, das funktioniert einwandfrei. Nun möchte ich den aber so abändern das er mir nur die Zellen M7, N24 und P7, Q24 und S7, T24 in Word ausgibt. Was muss ich da abändern?
Private Sub CommandButton1_Click() Dim...
23.07.2009 18:29:31
Thread-ID: 1090473
4 Beiträge
Makro: Buttonklick = Blatt u. Zelle auswählen
tuska

Hallo,
ich habe mit dem Makrorecorder Code aufgezeichnet und in Tabelle 1 einen Button angelegt.
Den Button habe ich mit dem Code Private Sub CommandButton1_Click() Sheets("Tabelle2").Select Range("E6").Select End Sub
belegt, jedoch erhalte ich zu Range("E6").Select immer eine Feh...
09.07.2010 21:56:49
Thread-ID: 1166414
5 Beiträge
Makro - Spalte A jede Zelle einzeln auswählen
Stef@n

Hallo Excel-Freunde
ich habe ein Sheet mit knapp 10.000 Zeilen.
Wenn eine Zelle in Spalte A markiert wird, wird ein Makro ausgelöst
Ich möchte jetzt einen komplette "Neuberechnung" (Ausführen des Makros)
durchführen.
Also müsste mein Makro ganz fleissig der Reihe nach jede Z...
05.03.2012 09:10:45
Thread-ID: 1253601
5 Beiträge
Anzeige
VBA Schleife Zellen auswählen und selektieren
Andreas

Hallo,
trotz langem Suchen habe ich keine Lösung gefunden. Ich hoffe Ihr könnt mich helfen.
Folgende Ausgangssituation:
- Mappe „Makro“ befindet sich nur ein Button mit meiner Makro.
- In der Mappe „Daten“ befinden sich alle Informationen die selektiert und kopiert werden sollen...
08.06.2015 14:34:45
Thread-ID: 1429823
4 Beiträge
Sehr viele Zellen auswählen mit VBA
Paul

Hallo,
ich möchte für meine Dienstplantabelle einen Resetbutton schaffen. Dieser soll sehr viele unterschiedlich positionierte Zellen auswählen und die Werte darin löschen. Ich schaffe es jedoch nicht VBA meine elend lange Liste unterzujubeln. Könnt ihr mir helfen?
Vielen Dank, Paul.
17.06.2015 15:44:05
Thread-ID: 1431484
7 Beiträge
VBA Zelle auswählen in Abhängigkeit des Zellinhalt
Zoe

Hallo,
ich hänge gerade an einem kleinen Problem.
Ich möchte wenn eine bestimmte Zelle einen Inhalt (Zahl) hat, das mir eine Message Box ausgegeben wird. Bis dahin ist das ja auch kein Problem.
If Worksheets("Tabelle2").Range("H36").Value "" Then
MsgBox "a reset must be perfor...
18.05.2016 09:08:06
Thread-ID: 1493850
6 Beiträge
Anzeige
eine Zelle auswählen andere sperren VBA
lia

Hallo liebes Forum,
ich möchte in eines der drei Zellen A1 C1 oder E1 ein Kreuzchen setzen. Sobald eines der Zellen ausgewählt wird(indem ein Kreuz gesetzt wird), sollen beide anderen Zellen gesperrt werden. Zum Beispiel könnte eine Meldung wie " du hast bereits ein Kreuz gesetzt" kommen.
18.12.2017 23:06:00
Thread-ID: 1597927
3 Beiträge
VBA - einzelne Zellen per STRG auswählen
Kleo

Hallo Zusammen,
Das ist mein erster Forum-Beitrag, also wäre ich dankbar, wenn Ihr ein bisschen nachsichtig mit mir seid.
Ich habe in den letzten Tagen ein Macro entwickelt, das, wenn man auf einen Button klickt, eine Spalte aus einem Tabellenblatt in ein anderes kopiert. Nun möchte ich...
20.02.2020 12:29:18
Thread-ID: 1741503
4 Beiträge
Auswählen gesperrter Zellen - VBA Code bei Blattschutz
Thorsten
Hallo zusammen,
ich brauch – mal - wieder Eure Hilfe.

Mit Hilfe eines VBA Codes habe ich verschiedene Tabellenblätter mit einem Passwort geschützt:

Sub ws_Protect(ParamArray Tabellenblaetter())
Dim ws
For Each ws In Tabellenblaetter
Worksheets(ws).Prot...
28.08.2024 13:59:53
Thread-ID: 1989404
8 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Zelle aktivieren in Excel VBA

Schritt-für-Schritt-Anleitung

  1. Zelle aktivieren: Um eine bestimmte Zelle in Excel VBA zu aktivieren, kannst du verschiedene Methoden nutzen. Hier ist ein einfaches Beispiel, um die Zelle C1 zu aktivieren, wenn du in Zeile 1 bist:

    Sub ZelleAktivieren()
   Rows(1).Select
   Cells(1, 3).Activate  ' Aktiviert die Zelle C1
End Sub

  2. Zurück zum zuletzt verwendeten Tabellenblatt: Um zum letzten verwendeten Tabellenblatt zurückzukehren, kannst du den folgenden Code verwenden. Füge diesen in das Modul "DieseArbeitsmappe" deiner Arbeitsmappe ein:

    Option Explicit
Public strLetztesSheet As String

Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
   strLetztesSheet = Sh.Name
End Sub

Sub LetztesSheetAufrufen()
   Worksheets(strLetztesSheet).Activate  ' Aktiviert das zuletzt verwendete Blatt
End Sub

Häufige Fehler und Lösungen

  • Fehler 1: "Objekt erforderlich"
    Lösung: Überprüfe, ob du das richtige Blatt ausgewählt hast, bevor du eine Zelle aktivierst. Stelle sicher, dass das Blatt aktiv ist.

  • Fehler 2: "Zelle konnte nicht aktiviert werden"
    Lösung: Dies kann passieren, wenn die Arbeitsmappe schreibgeschützt ist. Überprüfe die Eigenschaften der Arbeitsmappe und stelle sicher, dass sie nicht schreibgeschützt ist.

Alternative Methoden

  • Zelle auswählen ohne "Range": Wenn du die Zelle C1 auswählen möchtest, ohne Range("C1") zu verwenden, kannst du auch die Cells-Methode benutzen:

    ActiveSheet.Cells(1, 3).Select  ' Wählt die Zelle C1 aus

  • Offset-Methode: Wenn du immer von A1 kommst, kannst du die Offset-Methode nutzen:

    ActiveCell.Offset(0, 2).Select  ' Bewegt sich von A1 nach C1

Praktische Beispiele

  1. Zelle aktivieren mit Drag and Drop: Wenn du die Drag-and-Drop-Funktion in Excel aktivieren möchtest, kannst du dies in den Excel-Optionen unter "Erweiterte Optionen" tun.

  2. Excel Makro zur Zellenauswahl: Mit einem Makro kannst du die Zelle auswählen, die du benötigst:

    Sub MakroZelleAuswaehlen()
   ActiveSheet.Cells(1, 2).Select  ' Wählt die Zelle B1 aus
End Sub

Tipps für Profis

  • Nutze die With-Anweisung, um den Code effizienter zu gestalten. Beispiel:

    With ActiveSheet
   .Cells(1, 3).Activate  ' Aktiviere C1
End With

  • Verwende Application.Goto, um schnell zu einer bestimmten Zelle zu springen:

    Application.Goto Reference:=Range("C1")

FAQ: Häufige Fragen

1. Wie kann ich mehrere Zellen gleichzeitig aktivieren?
Du kannst mehrere Zellen mit dem Range-Objekt aktivieren:

Range("A1:C1").Select  ' Aktiviert die Zellen A1 bis C1

2. Kann ich die Zelle aktivieren, ohne sie auszuwählen?
Ja, du kannst die Zelle aktivieren, ohne sie auszuwählen, indem du die Activate-Methode verwendest:

Cells(1, 3).Activate  ' Aktiviert die Zelle C1 ohne sie auszuwählen

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige