Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
2004to2008
2004to2008
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

Per Button Zellen selectieren

Forumthread: Per Button Zellen selectieren

Per Button Zellen selectieren
05.02.2025 11:18:23
Micha
Hallo,

ich möchte per Button bestimmte Zellen wählen.
Beispiel:
Zelle A1 ist angewählt, Button wird betätigt, und
Zellen A1:S1 werden selectiert. (12 Zellen)
Keine bedingte Formatierung.

Wenn ich nun z.B. Zelle A25 anwähle, sollen
A25:S25 selectiert werden.

Wenn ich nun z.B. Zelle A250 anwähle, sollen
A250:S250 selectiert werden usw..usw..

Also wo immer ich die Spalte A anwähle, sollen
die Zellen "A-S" per Button gewählt werde.

Kann mir jemand den Code schreiben?

Für Deine (Eure) Bemühungen, bedanke ich mich bereits
im Voraus.

An dieser Stelle möchte ich allen Mitwirkenden des Forums
meinen Respect für die herausragrenden Leistungen aussprechen.
Weiter so!

MfG
Micha
Anzeige

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Per Button Zellen selectieren
05.02.2025 11:28:31
Onur
Was heisst "Keine bedingte Formatierung. " ???
AW: Per Button Zellen selectieren
05.02.2025 11:38:28
Micha
Hallo Onur,

ich meinte damit folgendes:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Target.Calculate
End Sub

Damit kann ich ja eine bedingte Formatierung auslösen:
=ZEILE()=ZELLE("Zeile")



Anzeige
AW: Per Button Zellen selectieren
05.02.2025 11:40:38
Onur
Nix für Ungut, aber was hat DAS denn jetzt mit deiner Fragestellung zu tun ?
AW: Per Button Zellen selectieren
05.02.2025 11:49:58
Micha
Hallo,

hätte ich blos den Satz rausgelassen!
Ich meinte eigendlich, dass wenn ich die Zellen
mit der bedingten Formatierung auswähle, kann ich diese
nicht weiterverarbeiten. Sie werden zwar gekennzeichnet,
jedoch kann ich diese Auswahl nicht für meinen Code
weiterverarbeiten. Sind also nur gekennzeichnet und nicht
selectiert. Ich bin kein VBA-Spezialist, daher kann ich mich
nicht fachgerecht ausdrücken. Hoffe auf Dein Verständnis.

Anzeige
AW: Per Button Zellen selectieren
05.02.2025 11:52:41
Onur
Mit der bedingten Formatierung kann man GAR NIX auswählen, höchstens den Format (Farbe, Schrift usw) verändern.
AW: Per Button Zellen selectieren
05.02.2025 11:51:59
MCO
Hallo Micha!

Das funktioniert: 

Private Sub Worksheet_SelectionChange(ByVal Target As Range)



    Application.EnableEvents = False

    If Target.Column > 1 Then GoTo ende

    Range(Target, Range("S" & Target.Row)).Select

ende:

    Application.EnableEvents = True

End Sub

Gruß, MCO
Anzeige
AW: Per Button Zellen selectieren
05.02.2025 12:07:39
Onur
"Zellen A1:S1 werden selectiert. (12 Zellen) " ??
Das sind 19 Zellen.
AW: Per Button Zellen selectieren
05.02.2025 12:00:57
MCO
Hey, hab das mit dem Knopf übersehen.


Bau das ein: 
Sub markieren()

    If ActiveCell.Column = 1 Then Range(ActiveCell, Range("S" & ActiveCell.Row)).Select

End Sub


Gruß, MCO
Anzeige
AW: Per Button Zellen selectieren
05.02.2025 12:07:06
Micha
Hallo MCO,

vielen, vielen Dank.
Genauso wollte ich es haben.
Auch vielen Dank an die anderen Helfer.

Gruß
Micha
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum