Første bogstav skal være med stort i access databasens tabel-rækk

Private Sub felt1_AfterUpdate()
[felt1].Value = StrConv([felt1].Value, vbProperCase)
End Sub

det er bare løgn!!! Det ser sku godt ud!!! Hvordan sætter jeg den ind?

Jeg er ik så god til access. Hvordan indsætter jeg makroen. Damnnn.. jeg glæder mig

tager den alle tabeller på en gang eller skal man gøre det på hver tabel?

Som koden fortææller dig, kan du sætte den ind i feltets AfterUpdate. Den tahger kun et enkelt felt. Hvis du smider din e-mail kan jeg sende en testdb.

Private Sub felt1_AfterUpdate()
[felt1].Value = StrConv([felt1].Value, vbProperCase)
End Sub

det lyder sku godt. min email er dmg@kromannreumert.com

Men det er ikke muligt at gøre sådan at den retter det på en hel tabel af gangen eller endnu bedre på alle sammen?

upss... forrsten, vil vores firewall ikke lukke sådan en fil igennem... du må meget gerne sende den istedet til webmaster@extreme-surfing.com

jeg bliver desværre nød til at løbe... men du høre helt klart fra mig senere idag eller i morgen.
Mange tak for hjælpen... soo fare

Sendt til begge adresser.

Hej igen. Undskyld jeg svarer så sent. Men er først kommet hjem nu.

Jeg har sendt dig en mail med info. Det som jeg skal bruge er faktisk en avanceret søg og erstat funktion. Som, søger hele tabellen igennem og derved udskifter de forebogstaver der ikke er skrevet med stort, til stort! Jeg håber du kan hjælpe :-)

og endnu engang... mange tak for hjælpen ;) soo fare

Her ikke modtaget nogen mail.
Men hurtigt over den sidste kop morgenkaffe, kan du bruge denne, efter at du har udskiftet tabel- og feltnavn:

With Tabel1
Do Until Me.NewRecord = True
[felt1].Value = StrConv([felt1].Value, vbProperCase)
DoCmd.GoToRecord acForm, "Formular1", acNext, 1
Loop
End With

Du laver først et modul (som IKKE må hedde strProper) med følgende funktion:

Public Function strProper(strSource As String) As String
  strProper = StrConv(strSource, vbProperCase)
End Function

Derefter laver du en forespørgsel, hvor du opdaterer dit navnefelt med strProper(navnefelt):

UPDATE TabelNavn
SET FeltNavn = strProper(FeltNavn)

Wow... 2 svar :-)

Mugs. Jeg har lige sendt den igen, via den anden email adresse.

Proaccess, hhmm... Jeg er altså meget dårlig til access, jeg kan godt finde ud af at lave modulet, men ikke forspørgelsen? Hvordan updater man et felt som du siger?

Db er modtaget og returneret med eksempel på kode.

databasen er returneret med flg. besked:

contained a file that is not accepted through the system.

The mail has been deleted from our system.

The system is blocking the following file types;

og så en lang række at filtyper der ikke tillades bl.a zip-filer.

Men du gør det således:
Åbn db i databasevinduet og vælg fanen tabeller. Marker tabellen 2tilmeldte" og find ikonet for autoformular på menulinien og vælg autoformular. Gen formularen og den skal hedde "Tilmaldte". Åbn formularen igen i designvisning og tag en kommendoknap fra værktøjskassen og indsæt denne kode i knappens VedKlik hændelse:

With Tilmeldte
Do Until Me.NewRecord = True
[firstname].Value = StrConv([firstname].Value, vbProperCase)
[lastname].Value = StrConv([lastname].Value, vbProperCase)
DoCmd.GoToRecord acForm, "Tilmeldte", acNext, 1
Loop
End With

For at opdatere alle felter skal du blot kopiere kodenlinien:

[lastname].Value = StrConv([lastname].Value, vbProperCase)

og ændre feltnavnet. Så skal det køre.

Nej nej, jeg har modtaget mailen :-) vores system blokere det bare, men jeg sidder i IT afdelingen så jeg kan godt hente den.

Ok. jeg prøver lige at følge din vejledning her :)

Hej Mugs.

Jeg er virkelig imponeret. Det er simpelthen alt for fedt... du fortjener et hvert point!!! Inden du får dem, vil jeg meget gerne vide, hvordan man laver sådan en formular.

Jeg er mere inden i det nu efter din rigtig gode vejledning.doc
Kan man ikke bare nøjes med at lave en kommandoknap og indsætte koden? Jeg prøver lidt selv, men det virker ik helt?

Hej Mugs.

Jeg har sendt dig en mail med fejlmeddelse. Den siger at objectet ikke kan åbnes???

Jeg har gjort præcis som du siger og forstår ik hvorfor det ik virker? Hvad kan det være? Efter det her svar, har du velfortjent alle dine points :-)

når jeg klikker på debug, markere den denne linje!!

DoCmd.GoToRecord acForm, "Tilmeldte", acNext, 1

Fordi dmg har navngivet formularen "ret". Fejlen fremkommer så, fordi Access ikke kan finde en formular med navnet "Tilmeldte".

Hehe... det var mig der dummet mig :( men du skal ha dine points ;-) mange tak for hjælpen og den ekstrem gode vejledning! Jeg kan da kun anbefalde dig!!!!

Tak for point og anbefalingen. Jeg har slettet alle data.

Det er perfekt!!! What a hero ;-)