Путаница в командах печати и записи VBA - PullRequest
2 голосов
/ 07 марта 2012

В ячейке C18 моего кода находится путь к файлу

C:\blahblahblah\yay.db

Я хочу написать текстовый файл, чтобы первая строка гласила:

uil_file_new.go( "C:\blahblahblah\yay.db","C:\blahblahblah\yay.db")

Я пробовал следующее:

Dim template As String
template = Range("C18").Value

Open (ThisWorkbook.Path & "\" & "test.txt") For Output Access Write Shared as #1
Print #1, "uil_file_new.go( " & template & "," & template & ")"
Close #1

, что дает

uil_file_new.go( C:\blahblahblah\yay.db ,C:\blahblahblah\yay.db)

Мне нужно, чтобы txt-файл имел "" вокруг путей к файлам. Есть ли способ передать переменную в текстовый файл, но иметь "" вокруг того, что переменная содержит?

Я пробовал команду Write # 1, но она просто помещает «шаблон», а это не то, чего я хочу.

Это не позволит мне написать сингл ", например, это будет нормально:

Write #1, "
Print #1, template
Write #1, "

но всегда исправляет его до

Write #1, ""

1 Ответ

2 голосов
/ 07 марта 2012

Чтобы напечатать ", удвойте их до "" так;

Print #1, "uil_file_new.go(""" & template & """,""" & template & """)"
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...