Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 10:28:49
16.10.2025 17:40:39
16.10.2025 17:25:38
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Maske in Tabelle mit Makro starten

Forumthread: Maske in Tabelle mit Makro starten

Maske in Tabelle mit Makro starten
09.08.2024 16:19:59
magictheisi
Hallo,
ich habe ein Excelsheet mit mehreren Arbeitsblättern. Auf einem sind mehrere "Tabellen" (Excel-Tabellenfunktion).

Ich kann normalerweise in eine der Tabellen klicken und dann über den Befehl "Maske" (Maske-Funktion von Excel-Tabellen) die komfortable Eingabeansicht aufrufen.
Von hand funktioniert das problemlos: Klick in die Tabelle, Klick auf Maske-Menüpunkt -> Maske geht auf.

Wenn ich nun versuche daraus ein Makro zu machen, ich zeichne einfach die beiden Klicks auf und lege den Code auf einen Button, bekomme ich immer eine Fehlermeldung: "Laufzeitfehler '1004': Die ShowDataForm-Methode des Worksheet-Objektes konnte nicht ausgeführt werden."

Debuggen zeigt die beiden Codezeilen an und markiert die letzte als das Problem:
Range("P12").Select

ActiveSheet.ShowDataForm


Kann mir irgendjemand einen Tipp geben, was ich falsch mache?

Danke für Eure Unterstützung!

magic


Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Maske in Tabelle mit Makro starten
09.08.2024 16:36:18
GerdL
Hallo,

lege deine Überschriften im Arbeitsblatt in A1, B1 ...; Zeile 1

Gruß Gerd
AW: Maske in Tabelle mit Makro starten
10.08.2024 21:42:41
magictheisi
Hallo Gerd,

du meinst die Überschriften der internen Tabellen? Das habe ich gemacht, keinerlei Veränderung im Verhalten, gleiche Fehlermeldung.

Danke für deine Unterstützung und Gruß

magic
Anzeige
AW: Maske in Tabelle mit Makro starten
10.08.2024 23:34:19
Kuwer
Hallo,
  Range("P12").Select

Application.SendKeys "%nm"

Starte es aber nicht im VBA-Editor!

Gruß, Uwe
AW: Maske in Tabelle mit Makro starten
11.08.2024 00:45:03
magictheisi
Hallo Uwe,

danke für deine Unterstützung.

Es kommt derselbe Fehler.

    Sheets("Datenbank").Select

Range("B2").Select
Application.SendKeys "%nm"
ActiveSheet.ShowDataForm
Sheets("Dashboard").Select


Gruß

magic
Anzeige
AW: Maske in Tabelle mit Makro starten
11.08.2024 01:11:43
Kuwer
Hallo magic,

1. ersetzt SendKeys die ShowDataForm-Anweisung
2. kenne ich Deine Datei nicht
3. habe ich O365 und kein 2016

tut mir leid.

Gruß, Uwe
AW: Maske in Tabelle mit Makro starten
11.08.2024 10:29:05
magictheisi
Hallo Uwe,

zu 1) nein, bisher hatte ich beide Codezeilen drin (s. Code in meiner letzten). Jetzt habe ich "ActiveSheet.ShowDataForm" mal durch "Application.SendKeys "%nm"" ersetzt, was aber auch kein anderes Ergebnis brachte.

zu 2) Leider schaffe ich es irgendwie nicht die Beispieldatei mit dem Makro hier hochzuladen. Noch ein Versuch: https://www.herber.de/bbs/user/171582.xlsm

Gruß

magic

Anzeige
AW: Maske in Tabelle mit Makro starten
11.08.2024 10:38:59
Oberschlumpf
Hi,

änder diese Codezeile...
Range("A5").Select

...um in...
ActiveSheet.Range("A5").Select


Der Grund deines Fehlers - ist nicht - die .ShowDataForm-Zeile, sondern...
- bei Start deines Makros ist "Dashboard" das aktive Tabellenblatt
- als erstes wird im Makro zum Blatt "Datenbank" gewechselt; aber! für VBA ist immer noch "Dashboard" das aktive Tabellenblatt!!!
- ein Befehl RANGE(zelle).SELECT kann nur im aktiven Tabellenblatt ausgeführt werden; das aktive Tabellenblatt MUSS aber auch angezeigt werden! = deswegen kommt es zum Fehler

- wenn du vor RANGE(...) aber ActiveSheet. vorsetzt, dann weiß auch VBA, was/wo/wie genau du es meinst

Bei mir läufts ohne Fehler - bei dir auch?

Ciao
Thorsten
Anzeige
AW: Maske in Tabelle mit Makro starten
11.08.2024 14:18:36
magictheisi
Perfekt! Danke an Thorsten! Das Problem ist gelöst - so einfach, wenn man es nur weiß... ;-)
;

Beliebteste Forumthreads (12 Monate)

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