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

Opzoek naar een stukje VBA Code

Status
Niet open voor verdere reacties.

novec

Gebruiker
Lid geworden
6 jan 2009
Berichten
194
Hallo

Op de afbeelding zie je een stukje code. Daar waar niet relevante info staat heb het even grijs afgedekt.

Waar ben ik naar op zoek.
Cel I16 in het werkblad "Uren Facturen" bevat het factuur nummer.
Die waarde haal ik op via de variabele welke ik X noem.

Dat werkt naar behoren.
Nu wil ik bij het opslaan dat de documentnaam wordt "Factuur + de waarde van X"
Uiteindelijk dus iets van "Factuur 20191234" waarbij 20191234 de waarde is welke X gevonden heeft.
Ik mis dus het stukje code wat op het rode blokje moet staan. De rest werkt prima.

Helaas ben ik het al een uurtje aan het proberen maar ik loop vast.

Afbeelding1.png

Dank alvast

Groet Steven
 
Met de
Code:
gegeven info moet het zoiets worden.
Code:
Facturen uit" & "\ " & Sheets("Uren factuur").Range("I16") & ".Pdf"
 
En vervolgens kan je dan de regels met .Activate en .Select eruit verwijderen.
Tevens kan die volledig overbodige ChDir opdracht er uit.
Ook Dim x As Long kan dan weg en de regel met x =

Zo hou je maar 2 regels over.
 
Laatst bewerkt:
Dank jullie wel.
Alles werkt zoals ik het wil.

Wat blijft dit een mooi forum!!

Steven
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan