Data Formulieren oproepen

[udo1967]

Wil via een Macro het invoer FOMULIER oproepen.
Echter krijg een 1004 fout melding
Wat gaat hier fout, waarom en wat is de oplossing ?


Sub Formulier()
'
' Data invoer Formulier oproepen
' De macro is opgenomen op 6-8-2005 door Rob.
'
'
ActiveSheet.ShowDataForm
End Sub

 

[LucB]

UDO,

Selecteer eerst een cel van je bereik.
bv Range("B4")


Sub Formulier()
'
' Data invoer Formulier oproepen
' De macro is opgenomen op 6-8-2005 door Rob.
'
'
Range("B4").Select
ActiveSheet.ShowDataForm
End Sub

Dit staat in Help van Excel.

Een gegevensinvoerformulier gebruiken om een lijst te bewerken

Een gegevensformulier is een dialoogvenster waarmee u in één keer een volledige gegevensrij (een record) uit een lijst kunt invoeren of weergeven.

Voordat u met een gegevensformulier een record aan een nieuwe lijst kunt toevoegen, moeten boven elke kolom in de lijst labels staan. Aan de hand van deze labels worden de velden op het formulier gemaakt.

1. Klik op een cel in de lijst waaraan u de record wilt toevoegen.
2. Kies Formulier in het menu Data.

 

[udo1967]

werkt nog niet correct

Het oproepen van het Formulier werkt nog niet correct.
Zie het bestand welke aan de vraag van 07-08-05 om
00:05 uur gekoppeled is.

Alvast bedankt

 

[LucHeyndrickx]

Inderdaad... via VBA herkent Excel de database niet als die niet in de eerste rij begint.

Dus dan maar even m'n toverdoos bovenhalen

Geef uw tabel een naam:
Database

en dan zal het wel werken.

Luc

 

[udo1967]

anders opgelost

Heb de layout van het Excel bestand anders gemaakt
en daarmee het Formulier probleem opgelost.
Dmv. het deleten van de eerste 6 lege rijen en
het groter maken van de nu 1e rij (voorheen 7e rij).

Nu ziet het Formulier wel de juiste rij...