• 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.

Excel automatisch opslaan naar celwaarde

Status
Niet open voor verdere reacties.

spookbakker

Nieuwe gebruiker
Lid geworden
2 nov 2015
Berichten
1
Hallo,

Ik ben bezig met het automatiseren van Excel bestanden, helaas ben ik nieuw met macro's/vba.
Wat ik precies wil is dat wanneer het bestand afgesloten wordt, het programma automatisch het bestand opslaat met als bestand naam "VR van" en de (meerdere) celwaarde die ik gekozen heb. De gekozen celwaardes bevatten: een datum wanneer het bestand is ingevuld, een nummer en een naam, mocht dit relevante informatie zijn.
Dit is wat ik tot nu toe heb, maar zoals jullie waarschijnlijk meteen opvalt is dat dit niet automatisch bij het sluiten van het bestand opgeslagen wordt.


Code:
Sub opslaan()
Dim stPath As String
With Sheets("Blad naam")
stPath = "G:\DATA\PA\Inkoop\Bjorn\"
ActiveWorkbook.SaveAs Filename:=stPath & "Gewenste Docu Naam " & .Range("C20") & .Range("C24") & .Range("C23") .Value & ".xlsm"
End With
End Sub

Houdt bij het beantwoorden van mijn vraag in uw achterhoofd dat ik hier nog weinig van af weet, alvast bedankt!:D
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan