Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
vba export to pdf: как убрать CHR(10)-квадратик в pdf файле
 
Экспортирую лист excel в PDF.

       ActiveSheet.ExportAsFixedFormat _
               Type:=xlTypePDF, _
               Filename:=strFileName, _
               Quality:=xlQualityStandard, _
               IncludeDocProperties:=True, _
               IgnorePrintAreas:=False, _
               OpenAfterPublish:=True

Но на листе есть ячейки с переносом строк.
в Pdf, в соответствующих местах, появляется "квадратик" символа новой строки - chr(10).
Как от него избавиться, сохранив перенос строки?

Если просто отправить лист на принтер CreatePDF, то квадратик не появляется. Но мне надо через vba
Импорт таблицы из Access: как узнать какие поля являются Primary Key?
 
собсвенно сабж.

Sub GetTableInfo()

Dim conn As ADODB.Connection
Dim rst As ADODB.Recordset
Set conn = New ADODB.Connection
Dim tbl As String
tbl = "Table1"

With conn
   .Provider = "Microsoft.ACE.OLEDB.12.0"
   .ConnectionString = "Data source=C:\MyDB.mdb"
   .Open
End With
Set rst = New ADODB.Recordset
rst.Open tbl, conn
For x = 0 To rst.Fields.Count - 1
    Range("A" & x + 3) = rst.Fields(x).Name
    Range("B" & x + 3) = rst.Fields(x).Type
     ' Range("C" & x + 3) = ???? ( как здесь определить является ли поле ключом таблицы?"
Next
rst.Close
conn.Close

Set rst = Nothing
Set conn = Nothing
End Sub
Изменено: Dmitry Vinogradov - 11.07.2013 17:15:00
почему Combobox_Change реагирует на изменение в ячейке?
 
есть именованный диапазон (periods) имя/начальная дата/конечная  
есть ячейки нач_дата и кон_дата  
есть combobox прилинкованный к periods с событием    
Private Sub ComboBox1_Change()  
   [нач_дата] = ComboBox1.Column(1)
   [кон_дата] = ComboBox1.Column(2)
End Sub  
 
Событие срабатывает при изменении значения комбобокса но и при изменении в ячейках нач_дата или кон_дата, не давая поэтому прописать в них произвольное значение.  
 
как сделать так что бы в ячейки нач_дата и кон_дата можно было бы вставлять и произвольные значения?
SMS рассылка из excel
 
есть задача отправлять SMS с данными из таблицы  
(некая статистика по разным магазинам)  
 
решил с помощью сервиса JustVoip (www.justvoip.com), который позволяет отправлять  
sms с помощью https ссылки:  
 
https://www.justvoip.com/myaccount/sendsms.php?username=xxxxxxxxxx​&password=xxxxxxxxxx&from=xxxxxxxxxx&to=xxxxxxxxxx&text=xxxxxxxxxx  
 
 
Explanation of the variables:  
 
   username: your JustVoip username  
   password: your JustVoip password  
   from: your username or your verified phone number. Always use international format for the number starting with +, for instance +491701234567  
   to: the number you wish to send the sms to. Always use international format starting with +, for instance +491701234567  
   text: the message you want to send    
 
вроде все работает, но осталось пара вопросов  
 
как передать символ возврата корретки в адрес (для переноса строки в тексте sms)  
как передавать русские буквы  
 
может кто поможет?
Страницы: 1
Наверх