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

Meldung aus geben cklick auf Button

Forumthread: Meldung aus geben cklick auf Button

Meldung aus geben cklick auf Button
07.07.2004 09:26:35
Stephan
Hallo Excels
wie bekommt man es hin, eine Medldung auszugeben wenn ein Befehl nicht ausgeführt werden kann.
Ich habe mir einen Reset Button für das AutoFilter gestrickt.
Wen aber kein AutoFilter aktiv ist, kommt immer der Laufzeitfehler "1004".
Wie kann ich das änder und eine eigene Meldung ausgeben ?
Der Code:

Private Sub Reset_AutoFilter_Click()
ActiveSheet.ShowAllData
End Sub

Gruß Stephan
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Meldung aus geben cklick auf Button
07.07.2004 09:37:29
KlausK
hallo stephan
noch in dein makro einbauen
on error goto errorhandler
errorhandler:
msgbox("autofilter nicht aktiv!")
exit sub

gruss klaus
AW: Meldung aus geben cklick auf Button
07.07.2004 09:42:09
ExceL
hi

Sub filter()
If ActiveSheet.FilterMode = True Then
MsgBox "ist an"
ActiveSheet.ShowAllData
Else
MsgBox " ist aus"
End If
End Sub


gruß
Christian
Anzeige
AW: Meldung aus geben cklick auf Button
07.07.2004 09:47:39
Ramses
Hallo
eine andere Variante den Autofilter zu prüfen

Private Sub CommandButton1_Click()
If ActiveSheet.AutoFilterMode Then
Debug.Print "OK"
'Ausschalten
Range("A1").AutoFilter
Else
Debug.Print "NO"
'Einschalten
Range("A1").AutoFilter
End If
End Sub

Da mehrere Autofilter in einer Tabelle möglich sind, kannst du mit "Range("A1")" explicit einen Bereich angeben, wo der Autofilter verwendet werden soll
Gruss Rainer
Anzeige
;

Forumthreads zu verwandten Themen

Beim Klick auf Abbrechen Makro beenden
chandler

Hallo,
wenn im nachfolgenden Makro auf die Schaltfläche Abbrechen geklickt wird bleibt das Makro stehen und wird nicht beendet. On Error Resume Next hilft nicht. Sub Test() 'Test ChDrive Left(CurDir, 1) ChDir CurDir Dim z As Range Dim search As String Set wbtarget = ThisWorkbook.Worksheets...
05.11.2012 14:39:02
Thread-ID: 1285354
5 Beiträge
Optionsbutton ausblenden funzt nur bei klick
EarnyToLearny

Liebe Excel-Profis,
es sollen 2 Optionsbuttons (nicht aus Formular erstellt) ausgeblendet werden, wenn ein Wert 1 in Zelle R25 steht. Funktioniert mit folgenden Code: Private Sub Worksheet_SelectionChange(ByVal Target As Range) Application.ScreenUpdating = False If Sheets("Tabelle1").Range(...
26.01.2013 17:07:38
Thread-ID: 1296107
5 Beiträge
userform bei klick auf button Uhrzeit in Zelle
Andreas

Hallo liebe fleißige Helfer.
Ich bastel gerade an einem VBA-Code der mir Verkehrszählungen vereinfachen soll. Ich nutze eine userform und wenn ich auf den button "pkw" klicke erhöht es mir ein Textfeld um ein. soweit so gut.
Nun möchte ich aber am ende ein zählprotokoll haben, bei dem i...
27.08.2014 16:05:10
Thread-ID: 1378511
33 Beiträge
Bei Klick auf Checkbutton soll Gedruckt werden
Langmantl

Hallo,
bei Klick auf Checkbutton soll selektiert werden, ob die Datei in Farbe oder in Schwarzweiß gedruckt wird und es soll mittels inputbox die Anzahl der kopien definierbar sein, danach drucken.
Wie lautet hierzu der Code?
05.11.2014 14:49:50
Thread-ID: 1390643
3 Beiträge
Klick auf CommandButton, Link nicht öffnen
Propman

Hallo,
ich habe eine kleine Testdatei hier aufgebaut:
https://dl.taikocloud.com/download.php?id=115&token=EkfT3Bffiltj4gpJfsfDbzEfW6dkU4Jp
(Wie schon mehrfach geschrieben ist es mir leider nicht möglich vom Mac aus irgendwelche Dateien bei Herber hochzuladen, weder mit Safari no...
01.03.2015 12:15:54
Thread-ID: 1412078
3 Beiträge
Aufrufenden cmdButton eines UF bestimmen
Wusel

Hallo zusammen,
ich habe mal wieder ein kleines Problem und hoffe man kann mir hier weiterhelfen :)
Ich habe ein Userform(UF1) gebaut und möchte dies nun von 2 verschiedenen anderen Userforms(UF2/UF3) aufrufen. Je nachdem ob UF2 oder UF3 aufruft soll UF1 aber anders befüllt werden. Jetz...
03.06.2015 22:27:42
Thread-ID: 1429182
5 Beiträge
Button auf Homepage klicken
Hermann

Hallo zusammen,
nach erfolgloser Suche & Testen habe ich es nun aufgegeben und benötige Hilfe von einem Experten.
Ich möchte mittels eines VBA einen bestimmten Button auf dieser Homepage klicken: "http://www.unternehmen24.info/Firmeninformationen/DE/4232667"
Freue mich um Suppor...
30.06.2016 18:28:50
Thread-ID: 1501912
4 Beiträge
Button auf Webseite anklicken (Firefox) - Teil
Markus

Hallo,
ich verwende folgenden Code, um eine Webseite in Firefox zu öffnen.
Das funktioniert soweit, mein Problem sind nur die letzten drei Zeilen (nach Shell...). Hier möchte ich einen Button auf der Webseite anklicken. In IE würde ich das über ein Object machen, aber ich weiss nicht,...
24.04.2017 11:15:01
Thread-ID: 1554333
3 Beiträge
Klick auf Listbox unterbinden
Sarah

Hallo Zusammen,
ich habe eine Suchfunktion, die eine Datei durchsucht und anschließend in der Listbox ausgibt. Mit Klick kann der entsprechende Datensatz zur Änderung übernommen werden.
Sollte die Suche keinen Erfolg haben, dann wird "Kein Eintrag" ausgegeben. Allerdings kann dies in de...
19.12.2017 13:30:02
Thread-ID: 1598054
3 Beiträge
klick auf Button fügt Zeile darunter
Michael

Hallo,
ich möchte beim aktivieren eines Buttons die Zeile mit Inhalt kopieren und darunter einfügen. Dabei sollen alle darunter stehenden Zeilen entsprechend weiterrutschen.
Es handelt sich um die Zeile in der der Button sich befindet. Also sinngemäß wie: Sub Zeileeinfügen() Zeile der...
29.10.2018 13:02:41
Thread-ID: 1654107
2 Beiträge
Anzeige
klick auf Button fügt Zeile darunter
Michael

Hallo,
ich möchte beim aktivieren eines Buttons die Zeile mit Inhalt kopieren und darunter einfügen. Dabei sollen alle darunter stehenden Zeilen entsprechend weiterrutschen.
Es handelt sich um die Zeile in der der Button sich befindet. Also sinngemäß wie: Sub Zeileeinfügen() Zeile der...
29.10.2018 13:10:32
Thread-ID: 1654109
7 Beiträge
Spalten ein- und ausblenden auf Klick
Joachim

Hallo zusammen,
ich möchte einen Belegungsplan erstellen und wo belegte Tage belegt gekennzeichnet sind (Farbe und "X"). Mit "Klick" auf die Zelle mit dem "X" (quasi Tagesdatum) in sollen die ausgeblendenen Spalten mit gleichem Tagesdatum rechts daneben eingeblendet und sichbar werden, so d...
06.11.2018 12:30:37
Thread-ID: 1655697
3 Beiträge

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige