Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Aufrufen per Makro des benutzerdefinierten Filters (als Box) ?

Frage Microsoft Microsoft Office

Mitglied: Tesi73

Tesi73 (Level 1) - Jetzt verbinden

15.03.2012, aktualisiert 10:38 Uhr, 5655 Aufrufe, 8 Kommentare

Hallo zusammen,

Excel ist soooo Umfangreich und ich such schon ewig.

Also meine Aufgabe sieht folgendermaßen aus:
erstelle eine Tabelle;
setze den Autofilter;
sortiere nach "Status"(Dropdownmenü öffnet sich)
Benutzerdefiniert;
Es öffnet sich ein Fenster(Box)
14288d31ca5f01174657b61fea26f192 - Klicke auf das Bild, um es zu vergrößern

Benutzerdefinierter Autofilter - Zeilen Anzeigen"Status"(siehe Bild)


Dieser benutzerdefinierte Autofilter in dieser Box soll als mögliche Eingabebox bleiben für die User zum suchen nach bestimmten Stichpunkten.

04f743089805c1aaa34851dc38d936d5 - Klicke auf das Bild, um es zu vergrößern
Das Fenster soll auf "Enthält" stehen, in meinem Fall also Hilfe oder OK. So soll das Macro das Fenster Anzeigen und Stehen lassen um mit der Suche zu beginnen.

Eigendlich dachte ich ist es nicht so schlimm, makro Aufzeichnen und gut.
Das kam dabei raus:
Sub Makro1()
'
' Makro1 Makro
' Makro am 15.03.2012 von tesi aufgezeichnet
'
' Tastenkombination: Strg+w
'
Selection.AutoFilter Field:=3, Criteria1:="=**", Operator:=xlAnd
End Sub

Aber nix.

Hat jemand eine Idee, ich wäre echt dankbar da es morgen fertig sein soll.

Danke im voraus!
Tesi
Mitglied: 83928
15.03.2012 um 12:22 Uhr
Hi,
AFAIK ist es nicht möglich, per VBA den Autofilter-Dialog anzeigen zu lassen. Bis morgen hast Du aber bestimmt eine eigene UserForm erstellt ;)
Oder Du "arbeitest" mit Sendkeys. Das wird zwar auch (meist) funktionieren, kann aber auch böse enden ;)

Gruß abaaba
Bitte warten ..
Mitglied: Tesi73
15.03.2012 um 14:00 Uhr
Hallo,
danke für deine Beitrag, aber der Chef will es so. Wie könnte ich es trotzdem schaffen, Hilfsansätze oder umwege?

Gruß Tesi73
Bitte warten ..
Mitglied: 83928
15.03.2012 um 14:17 Uhr
soll also unbedingt der original Autofilter-Dialog sein. sendkeys hast Du dir angeschaut??
Bitte warten ..
Mitglied: mak-xxl
15.03.2012 um 14:27 Uhr
Hallo Tesi,

wenn es der besagte Dialog sein soll:

01.
retVal = Application.Dialogs(xlDialogFilterAdvanced).Show
Zum weiterlesen: Herber.de, siehe unten den Link auf die gesamte Liste.

Freundliche Grüße von der Insel - Mario
Bitte warten ..
Mitglied: 83928
15.03.2012 um 14:51 Uhr
Zitat von mak-xxl:
Hallo Tesi,

wenn es der besagte Dialog sein soll:

01.
retVal = Application.Dialogs(xlDialogFilterAdvanced).Show
Zum weiterlesen: Herber.de, siehe unten den Link auf die gesamte Liste.

Freundliche Grüße von der Insel - Mario

Ui, wieder was gelernt ;)
Bitte warten ..
Mitglied: Tesi73
15.03.2012 um 15:02 Uhr
ja habe ich aber auch nicht so das passende gefunden, habe schon überlegt ob man einen Hotkey dort auf den Autofilter setzen kann.
Bitte warten ..
Mitglied: Tesi73
15.03.2012 um 15:24 Uhr
Hallo Mario,

geiler Tipp, schau gerade mal durch ob ich meine Aufforderung dort finden kann. Wenn ich sie gefunden habe Poste ich sie.

Gruß Tesi
Bitte warten ..
Mitglied: Tesi73
15.03.2012 um 15:56 Uhr
retVal = Application.Dialogs(xlDialogFilterAdvanced).Show - Spezialfilter
retVal = Application.Dialogs(xlDialogFilter).Show - Einfacher Filter(Autofilter) er setzt auch die Funktion des Autofilters, aber macht mir nicht die Box dazu auf.

Wo ist jetzt der Autofilter. Ick wat verrückt!;)
Bitte warten ..
Ähnliche Inhalte
Windows Server
Azure: Benutzerdefinierte Rolle anlegen
Frage von dafdagWindows Server

Hallo zusammen, ich möchte in Azure eine ganz einfache benutzerdefinierte Rolle anlegen. Die Erstellung über Powershell funktioniert einwandfrei. Allerdings ...

Hyper-V
Verhindert AVM FRITZ!Box 6490 den Aufruf von Port 8050 in virtuellem Computer?
gelöst Frage von LaManchaHyper-V6 Kommentare

Hallo Experten, leider komme ich bei diesem Problem nicht weiter: Ich habe ein Notebook mit Windows 8.1 Professional (A) ...

Windows 7
Benutzerdefinierte Papierformate exportieren
Frage von Konfu2kWindows 7

Hallo, ich habe hier ein Windows 7 System, wo für PostScript benutzerdefinierte Papierformate angelegt wurden. Nun sollen diese Formante ...

Windows 8
Benutzerdefinierte DLLs werden geladen
gelöst Frage von bytetixWindows 815 Kommentare

HI, habe seit kurzem in meinem Eventlog diese Meldung: Wie kriege ich denn raus von welchen DLLs die Rede ...

Neue Wissensbeiträge
Windows 10

Systemdienste behalten nach Win10 inplace-Upgrade nicht die ggf. modifizierte Startart bei

Tipp von DerWoWusste vor 11 MinutenWindows 10

Stellt Euch vor, Ihr habt ein Win10 System und modifiziert dort die Startart von Systemdiensten. Zum Beispiel wollt Ihr ...

Microsoft Office

Deaktivieren von Startbildschirm und Backstage-Ansicht in Office 2016 per Batch-Datei

Anleitung von SarekHL vor 3 StundenMicrosoft Office13 Kommentare

Guten Morgen zusammen! Ich habe mir gestern (auch mit Hilfe dieses Boards) ein Script gebastelt, um in Office 2016 ...

Erkennung und -Abwehr

Sicherheitslücke Spectre und Meltdown: Status prüfen

Anleitung von Frank vor 9 StundenErkennung und -Abwehr2 Kommentare

Nach all den Updates der letzten Woche sollte man unbedingt auch den Status prüfen, ob die Sicherheitslücken Spectre, Meltdown ...

Microsoft Office

Office 2010 Starter erneut auf einer frischen Windows-Version installieren

Tipp von Lochkartenstanzer vor 1 TagMicrosoft Office10 Kommentare

Moin, vor ein paar Tagen schlug bei mir ein Kunde auf, der sein Widnows 7 geschrottet und es inklusive ...

Heiß diskutierte Inhalte
Netzwerke
NTFS-Berechtigung
Frage von Daoudi1973Netzwerke23 Kommentare

Hallo zusammen und frohes neues Jahr (Sorry, ich bin spät dran) Meine Frage: 1- Ich habe einen Ordner im ...

iOS
Einladung vom iphone kalender
Frage von jensgebkeniOS15 Kommentare

Hallo Gemeinschaft, folgendes Problem - immer wenn ich von meinem Iphone einen Termin einztrage und diesem Termin Teilnehmer zuweise, ...

Drucker und Scanner
Gesucht DIN A3 Drucker
Frage von NebellichtDrucker und Scanner15 Kommentare

Hallo, ich möchte einen neuen DIN A3 Drucker kaufen. Um ab und zu, ca. 1 mal die Woche Farbausdrucke ...

Batch & Shell
Dateien verschieben mit batch
gelöst Frage von michi-ffmBatch & Shell13 Kommentare

Hallo Zusammen hat jemand evtl eine Idee? Zunächst hier das Skript: Leider werden keine UNC-Pfade unterstüzt, kann mir jemand ...