Страница: 1 | 
		
		 
			   
			 
			 
			 
			 Страница: 1 | 
 
			
 
  
		
     
  
    
Вопрос: Экспорт данных из Access в Excel
     
    
Добавлено: 25.08.08 13:33
     
      
  
				
			  
					 
			
				 
    
		
       
    
Автор вопроса:  
     Alto
 Alto
      
       
  
Как экспортировать данные в существующую книгу Excel в нужные листы и в определенный диапазон данные из запроса Access? Данные в этом файле должны обновляться, т.е. стирать старые и вставлять новые, каждый раз при выполнении процедуры.
 
    
				
		
		
					 
			
				 
  
		
     
  
    
Ответы
     
    
Всего ответов: 3
     
      
  
		
	  
			 
	
		 
    
       
    
Номер ответа: 1 
      
Автор ответа: alex405
 alex405

Вопросов: 1
Ответов: 1
      
 Профиль |  | #1
       
Добавлено:  17.09.08 09:02
       
    
       
  
Ну так в Excel-евском VBA написать модуль формирующий рекордсет посредством SQL-запроса к базе и встаdить нужные данные в нужные места либо перебором в цикле Do....Loop, либо если позволяет ситуация сразу через CopyFromRecordset.
 
    
		
	  
			 
	
		 
    
       
    
Номер ответа: 2 
      
Автор ответа: mc-black
 mc-black


ICQ: 308-534-060 
Вопросов: 20
Ответов: 1860
      
 Web-сайт:  
 Профиль |  | #2
      
Добавлено:  19.09.08 15:28
       
    
       
  
alex405: +1
 
    
или если из VBA Access, то подключить библиотеку по работе с Excel и сделать то же самое.
		
	  
			 
	
		 
    
       
    
Номер ответа: 3 
      
Автор ответа: Teach
 Teach






Вопросов: 6
Ответов: 5
      
 Профиль |  | #3
       
Добавлено:  25.09.08 00:31
       
    
       
  
 
    
Set AppE = CreateObject("Excel.Application" 
AppE.workbooks.Open App.Path + "\tab.xls"
AppE.workbooks("tab.xls" .Sheets(1).range("A1"
.Sheets(1).range("A1" .CopyFromRecordset rs1
.CopyFromRecordset rs1
или для массива
AppE.workbooks("tab.xls" .Sheets(1).range("A1"
.Sheets(1).range("A1" .Resize(rs1.RecordCount, 90).Value = Табель
.Resize(rs1.RecordCount, 90).Value = Табель