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

Werken met replace in een code

Status
Niet open voor verdere reacties.
tonissteiner

tonissteiner

Gebruiker
Lid geworden
17 sep 2008
Berichten
337
Hallo,

ik zit wat in de knoei met een code.
Hoe kan ik volgende code:

Code: 
Range("D10").Value = Replace(Range("D10").Value, "/", "_")

integreren in deze:

Code: 
BestandsNaam = Sheets("Mechanical Checklist").[G10].Value & " - " & Sheets("Mechanical Checklist").[D10].Value & " - " & "Mechanical Checklist"

waarbij dit deel:

Sheets("Mechanical Checklist").[D10].Value

zou moeten vervangen worden door de eerste code.

Ik krijg het niet voor elkaar.

Alvast bedankt voor jullie reacties
 
Code: 
Range("D10").replace "/", "-"
 
bedankt voor de snelle reactie Harry,

ik doe nog wat verkeerd. ik plaats waarschijnlijk de haakjes verkeerd of ergens niet...
 
Beter?
Code: 
bestandsnaam = Sheets("Mechanical Checklist").[G10].Value & " - " & replace(Sheets("Mechanical Checklist").[D10].Value, "/", "_") & " - " & "Mechanical Checklist"
 
WOEHOEW dat is het. nu snap ik het ook.

bedankt Harry en prettig weekend

mvg,

Stefan
 
Graag gedaan Stefan.
Ook een goed weekend.
 
Of ?

Code: 
with Sheets("Mechanical Checklist")
    bestandsnaam = replace(join(array(.[G10],.[D10],.name),"-"),"/","_")
End With
 
Hallo snb,

jij ook bedankt voor je reactie. Echter gaat jouw code mijn petje te boven, heb nog nooit gewerkt met deze join.
Maar bedankt voor de tip, ik sla jou code als commentaar mee op in mijn document zodat ik als ik die nog eens nodig ze eenvoudig weet te vinden.

Prettig weekend ook... en vergeet niet te drinken met dit warme weer ;)
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan