• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

opslaan na invullen veld

Status
Niet open voor verdere reacties.
J

jellevanbruggen

Gebruiker
Lid geworden
15 jul 2009
Berichten
28
Help,

als bijlage heb ik een bestand meegestuurd. Nu wil ik dat op het moment het veld in kolom D wordt ingevuld dat het bestand automatisch wordt opgeslagen.
Hoe stel ik dat in?
 

Bijlagen

  • Map1.xls
    24 KB · Weergaven: 30
Zo misschien:
 

Bijlagen

  • Aut_opslaan.xls
    34,5 KB · Weergaven: 52
Ja zo kan dit. Maar hoor graag van je hoe je dit hebt ingesteld zodat ik dit ook bij andere documenten kan instellen
 
Druk ALT-F11 en je ziet de code staan die daar voor verantwoordelijk is.
 
Oke begrijp de code maar hoe kan ik deze code ook toevoegen in een ander excel bestand.
Is er iets specifieks aan deze code zodat ik die niet zomaar kan gebruiken in een ander bestand?
 
Enkel dit
Code: 
Range("D2:D10")
is variabel en dient dus aangepast te worden aan uw bestand.
 
Dan zet je deze code in ThisWorkbook - en dus niet achter een sheet:
Code: 
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
With ActiveSheet
If Not Intersect(Target, .Range("D2:D10")) Is Nothing And Target.Count = 1 Then
 If Target <> "" Then
  Application.DisplayAlerts = False
  ThisWorkbook.Save
 End If
End If
End With

End Sub

PS Vergeet niet de oude code te verwijderen!
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan