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

Datenbereich für Datenmaske festlegen

Datenbereich für Datenmaske festlegen
27.07.2003 11:07:01
Volker M
Hallo Forum
Ich möchte Daten in eine Tabelle mit der Datenmaske aus dem Menue DATEN eingeben. Die Datenmaske soll aus einem anderen Tabellenblatt aufgerufen werden können. Da sich nun auf dem Tabellenblatt mehrere Datenbankbereiche verteilt befinden, müssten die jeweiligen Datenbankbereiche angesprochen werden.
Für Spalte A ist es kein Problem; nur wie komme ich z. B. auf die Spalten AF:AO.
Wie müsste folgender Code verändert werden.

Sub Maske()
Sheets("Daten").Select
ActiveSheet.ShowDataForm
End Sub

Vielen Dank im Voraus
Gruß Volker M

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

Betreff
Datum
Anwender
Anzeige
AW: Datenbereich für Datenmaske festlegen
27.07.2003 11:08:26
Hajo_Zi
Hallo Volker
versuchs damit das Du eine Zelle in dem Bereich wählst.
Gruß Hajo
Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.

AW: Datenbereich für Datenmaske festlegen
27.07.2003 12:03:09
Volker M
Hallo Hajo
Danke für deine Anwort.
Wenn ich eine Zelle in dem Bereich wähle, kommt die Laufzeitfehlermeldung '1004'.
ShowDataForm-Methode des Worksheet-Objektes konnte nicht ausgeführt werden.
Wird der Aufruf händisch durchgeführt, läuft es natürlich. Nur benötige ich es als Makro.
Gruß Volker

Anzeige
AW: Datenbereich für Datenmaske festlegen
27.07.2003 12:11:02
Hajo_Zi
Hallo Volker
ich habe mal ein Blick in mein schlaues Buch von Michael Kofler geschmissen.

Sub Maske()
Sheets("Daten").Select
Range("AF1").CurrentRegion.Name = "Datenbank"
ActiveSheet.ShowDataForm
End Sub

Gruß Hajo
Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.

Anzeige
AW: Datenbereich für Datenmaske festlegen
27.07.2003 12:23:03
Volker M
Hallo Hajo
Hab vielen Dank; der Code läuft wie ich es wollte.
Gruß auch an Michael Kofler.
Einen schönen Sonntag noch.
Volker

AW: Datenbereich für Datenmaske festlegen
27.07.2003 12:26:42
Hajo_Zi
Hallo Volker
in VBA kann auf Select usw. verzichtet werden.

Sub Maske()
With Sheets("Daten")
.Range("AF1").CurrentRegion.Name = "Datenbank"
.ShowDataForm
End With
End Sub

Gruß Hajo
Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.

Anzeige
AW: Datenbereich für Datenmaske festlegen
27.07.2003 12:53:04
Volker M
Hallo Hajo
Habe es bereits mehrmals von dir gelesen und versuche es auch zu beachten.
Danke nochmal.
Gruß Volker

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige