I found your dilemma to be another oddity of VBA. The following workaround should solve your problem. I found that setting the listindex to an object (x1 or x2) and then
setting the object to the listindex after the changing worksheet values to be one solution to your problem.
The following code...
The following code should solve your problem:
To use this example, copy this sample code to the Declarations portion of a form "UserForm1". Make sure that the form contains the following controls:
**two forms called UserForm1 and UserForm2-
you don't necessarily need UserForm2 but you...
The following code will give you the general idea on how to resolve this problem:
Sub datatransfer()
' Word document to insert Excel data into
file2$ = "C:\Data\Doc1.doc"
chan = DDEInitiate("WinWord", file2$)
Set rangeToPoke =...
The following formula will translate a date to German.
=IF(C1=0,"",CHOOSE(MONTH(C1),"Januar", "Februar","Marz","April", "Mai","Juni","Juli"...
Mala is correct. One solution to your problem may be as follows:
Place the following code in the module of any workbook (other than one named Book1.xls):
Sub ShowMyForm()
Application.Run ("Book1!ShowForm")
End Sub
Then place the following code into a different workbook in this...