Postgresql требуется настроеный ODBC Sub sql_code() Set ws = Application.ActiveSheet Set ADO_Connect = CreateObject("ADODB.Connection") sqlstr = ws.Cells(1, 1) ' здесь написана сам SQL код sqlstr = "SELECT * FROM public.""ContractsType"" "     ADO_Connect.ConnectionString = "Driver={PostgreSQL UNICODE(x64)};Server=*;Port=*;Database=*;UID=*;Pwd=*"     ADO_Connect.Mode = adModeReadWrite     ADO_Connect...

В 12 статье рассмотрели работу в EXCEL по обмену данными между файлами и вывод данных из EXCEL файлов в текстовый файл. Да текстовый файл создавался с разделителями. Можно по-другому перевести в текстовый файл. Я об этом уже писал. Можно применить v=RSQ.GetString с последующим выводом в текстовый файл. Прочитать блокнотом или другими приложениями. В этой статье я расскажу, как вывести данные из текстового файла в файлы EXCEL. Прежде чем это сделать, Я поясню, что этот вывод немного похож на вывод данных из текстовых файлов в dbf файл. Данные необходимо вывести автоматом, подобрав длину строки в символах с понятием символов разделителей...