View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
keldo[_4_] keldo[_4_] is offline
external usenet poster
 
Posts: 1
Default Help on retrieve data in each worksheet


I try to write a program to retrieve data from a database for eac
worksheet, but fail :( , would you mind to help me what problems fo
the below codings?

=================================
Sub Macro1()

Dim sh As Worksheet

For Each sh In ThisWorkbook.Worksheets

Range("A1", "AZ171").Select
Application.Run Macro:=("EssMenuRetrieve")
Range("A173", "AZ344").Select
Application.Run Macro:=("EssMenuRetrieve")

Next sh

End Sub
=================================

--
keld
-----------------------------------------------------------------------
keldo's Profile: http://www.excelforum.com/member.php...fo&userid=1391
View this thread: http://www.excelforum.com/showthread.php?threadid=27073