Live-Forum - Die aktuellen Beiträge
Datum
Titel
13.10.2025 19:31:31
VBA Formel mit Bezug auf Überschrift anstatt Spalte
13.10.2025 15:10:17
Überlappende Zeiträume über mehrere Tabellen mit leeren Zell
13.10.2025 13:34:56
PQ Abfrage mit verschiedenen Werten ausführen + Protokoll
13.10.2025 12:24:02
Zählen in Abhängigkeit einer Jahreszahl
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
1088to1092
1088to1092
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Fehlermeldung vermeiden

Forumthread: Fehlermeldung vermeiden

Fehlermeldung vermeiden
Peter
Guten Tag
Ich habe nachfolgenden Code einer Funktionstaste zugewiesen.
Sub links()
Selection.Offset(0, -1).Select
End Sub
Jetzt erhalte ich natürlich eine Fehlermeldung, wenn die Markierung irgendwo in Spalte A steht.
Wie erweitere ich den Code sinnvollerweise, damit keine Fehlermeldung erscheint?
Gruss, Peter
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Fehlermeldung vermeiden
14.07.2009 08:37:51
Helmut
Hallo Peter,
so (Achtung gegebenenfalls Fehlerbehandlung wieder zurückstellen)
Sub links()
On Error Resume Next
Selection.Offset(0, -1).Select
End Sub
oder so
Sub links1()
If Selection.Column > 1 Then
Selection.Offset(0, -1).Select
End If
End Sub

Anzeige
AW: Fehlermeldung vermeiden
14.07.2009 08:44:44
Hajo_Zi
Hallo Peter,
Option Explicit
Sub links()
If Selection.Column > 1 Then Selection.Offset(0, -1).Select
End Sub


AW: Fehlermeldung vermeiden
14.07.2009 09:07:52
Peter
Hallo Hajo
Ich habe noch eine Anschlussfrage
Ich habe auch folgenden Code einer Funktionstaste zugewiesen.
If Selection.Column < 256 Then
Selection.Offset(0, 1).Select
End If
Nun haben ja neuere Excel-Versionen meines Wissens mehr Spalten. Ist es möglich, die in der aktuellen Version vorhandene Spaltenanzahl abzufragen und dann dieses Ergebnis (anstelle des Wertes 256) mit Selection.Column abzugleichen?
Danke für eine Antwort und Gruss, Peter
Anzeige
AW: Fehlermeldung vermeiden
14.07.2009 09:12:33
Matthias5
Hallo Peter,
ich hoffe es ist in Ordnung, wenn ich auch mal eine Antwort dazwischenschiebe:
If Selection.Column < Columns.Count Then
Selection.Offset(0, 1).Select
End If
Gruß,
Matthias
AW: Fehlermeldung vermeiden
14.07.2009 10:02:22
Peter
Hallo Matthias
Klar, ist in Ordnung ;-)
Vielen Dank!
Peter
AW: Fehlermeldung vermeiden
14.07.2009 08:59:39
Peter
Vielen Dank
Ich habe mich für Hajo's Vorschlag entschieden.
Gruss, Peter
Anzeige
;

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