Hi.
Assuming that you intend to run Your code from a standard excel file, if you want to open another excel file called, say, "Myfile.xls" which has 11111111 as password, this is the code.
Workbooks.Open Filename:="Myfile.xls, password:="11111111"
Hope this helps.
Bye
Nick
Hi sSnowmantle.
Forget my last post.
Private Sub cboAmountWords_Change()
For Row = 1 To LastRowAmount
If cboAmountWords.Value = Worksheets("Amount").Cells(Row, 2).Value Then
cboAmount.Value = Worksheets("Amount").Cells(Row, 1).Value
Exit for
Else
cboAmount.value = ""
End If
Next Row
End Sub...
Hi Snowmantle.
Here I'm again (hope for last time about this thread).
I looked at your code and, all in all, I would write it in a cleaner way, as following (just for one combo. for the other one do the same changing properly the combo names)
Private Sub cboAmountWords_Change()
For Row = 1 To...
Hi Snowmantle.
Here I'm again.
There's a little correction about the code I posted befor.
This is the correct one.
Private Sub cboAmountWords_Change()
LastRowAmount = ThisWorkbook.Worksheets("Amount").Range("A65536").End(xlUp).Row
For Row = 1 To LastRowAmount
If cboAmount.Value =...
Hi.
Just a suggestion "on the fly".
Add to your "If" istructions the false condition.
That is:
Private Sub cboAmount_Change()
LastRowAmount = ThisWorkbook.Worksheets("Amount").Range("A65536").End(xlUp).Row
For Row = 1 To LastRowAmount
If cboAmount.Value = Worksheets("Amount").Cells(Row...
Hi xlbo.
Of course you're right.
But as far as I've understood, I would need to run excel or word etc... anyway in order to open a new istance of the application (Am I wrong?).
What I would like to do is to open my file without visualizing excel or any other office application at all.
That's why...
Hi, and thanks for replying.
Since I don't have any programming language except for vba in excel 2000, I've tried it with a batch file.
I wrote the path (i.e. : C:\myfile.xls).
It worked but-obviously- it opened my file normally, that is passing through excel.
Does anybody know which is the...
Hi.
This time my question in not about a vba problem.
I simply cannot remember the name of the command to type in Start/Execute textbox so as to visualize all the programs executed when windows is started.
Something like autoexe.*** or so...
Thank you.
Bye
Nick
Hi.
I've an excel 2000 workbook with a single userform opened via workbook_open event.
In that form initialize event I put app.visible=false.
It works perfectly. My form is shown directly on dektop without visualizing excel, except for some seconds during excel opening before workbook_open...
Hi PHV, thanks for replying.
So am I using Userform.Listbox object.
If I set columnheads property to true, suddenly appear, on design time, columns labels (Column A, B...) at the top of list box.
Where I'm I wrong?
Thank you
Nick
Hi.
I've a listbox with rowsource property.
The first row of the sheet range doesn't contain data but just a heading.
I would like my list box to scroll from second row so as to have heading always on top.
I tried with "Columnhead" property but it doesn't work because it assumes that columnheads...
Hi Combo.
Thank you very much. it works perfectly.
Now, when I open my workbook, the application is shown for 1 second before being hidden.
I understand that it's necessary to run excel in order to generate workbook_open event where I put the code to hide the application.
What I wish to know...
Hi everybody.
Here's what I've discovered just by chance.
I've an excel 2000 workbook with a form that's always shown as it's loaded via workbook_open event and unloaded via workbook_beforeclose event.
I realized that if I put , in workbook_open event, the code...
Hi ev'rybody.
Here's my problem.
I've created and distributed a complete workbook (excel 2000).
Now, after almost 2 years, I've realized that when I developed it I assumed that (as it happens most times) all common files extensions are always hidden (folder settings).
So, there are tons of...
Hi.
I suppose you're using excel and so you can load only one form at once.
So you have to use a global variable.
A global variable must be written in a macro module (not in a Userform module) so as to be visible from any routine.
In a module:
(In general area at the top of the module)
declare...
Hi.
As far as I can see in your code there could be a couple of causes.
An error of logic
You wrote:
....
Else
If....
Just remove 2d if...
so i'd write your code like this:
Private Sub txtTime_Change()
If txtTime.Value < txtDate.Value Then
MsgBox ("The Due Date is less then the Request...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.