Hej

Håller på med ett makro som skapar en script fil som autocad använder för att tända o släcka lager på en ritning. Allt fungerar bra om det inte finns några mellanslag i lagernamnet. Om det är det så måste man ha fnuttar runt lagernamnet.

exempel:
fsoFil.Write ActiveCell.Offset(rad, 1).Value & Chr(13) & Chr(10)
returnerar ex GULA LAGER... men jag vill att det ska returnera "GULA LAGER"

Om du ska skriva " i en sträng använder du antingen teckenkoden precis som du gör med chr(13), eller så escapar du den med en till;

s = "Lars ""Lasse"" Kongo"

Motsvarar alltså
Lars "Lasse" Kongo

Vill du bara ha en " så får du skriva """".

Sen kan jag ju tipsa om att vbCrLf är lite snyggare än chr-grejerna.

Ibland så är svaret enklare än vad man tror. Använder mig av chr(34). Det blir enhetligt..

fsoFil.Write Chr(34) & ActiveCell.Offset(rad, 1).Value & Chr(34) & Chr(13) & Chr(10)

Tackar för hjälpen.

Jag skulle verkligen rekommendera att du överväger det andra alternativet;

fsoFil.Write """" & ActiveCell.Offset(rad, 1).Value & """" & vbNewLine

eller

fsoFil.Write """" & ActiveCell.Offset(rad, 1).Value & """" & vbCrLf

Det är inte speciellt snyggt med chr. (Och använder du chr bör du åtminstone använda chr$.)