Добрый день. Есть файл с финансовой учетностью компании - каждый лист это отдельный день. в течении которого заполняются расходы, доходы и тд. Как сделать, чтобы например 1-го июля пользователи могли открыть только лист "1 июля", а второго июля - только "2 июля"?

Добрый день, появилась необходимость написать макрос, который сохраняет значение определенной ячейки в файл .txt, но надо чтобы данные были записаны в юникоде.  
 
До этого использовал для записи следующий прием:  
 
FileName = ThisWorkbook.Path & "\beta\beta1.txt"  
Open FileName For Output As #1  
For i = 101 To 101  
If Cells(i, 1) <> "" Then  
Print #1, Cells(i, 1).Value  
End If  
Next i  
Close #1  
 
Чем необходимо дополнить код, чтобы сохранялся именно юникод? Заранее спасибо ))