Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 536
Default Variables in a Popup prompt

Msgbox below works fine, returns a capital letter for j and an ASCII char for i.
The timed Popup works fine with prompt shown, want another timed Popup to display what the message box does and do away with the msgbox.
i and j are declared variable refering to two cells on the worksheet.

Possible?

I have tried to put the j and the i in the prompt section of this timed popup but it rejects .Popup "j & " for " & i" as well as .Popup j & " for " & i


MsgBox j & " for " & i

CreateObject("WScript.Shell").Popup "Select another Capital Letter in K1 to
convert to ASCII", _
2, "ASCII Select"

(The CreateObject... text will probably wrap)

Thanks,
Howard
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 538
Default Variables in a Popup prompt

Howard wrote:

Msgbox below works fine, returns a capital letter for j and an ASCII
char for i.


I assume that's supposed to be "ASCII value".

The timed Popup works fine with prompt shown, want another
timed Popup to display what the message box does and do away with the
msgbox. i and j are declared variable refering to two cells on the
worksheet.

Possible?

I have tried to put the j and the i in the prompt section of this timed
popup but it rejects .Popup "j & " for " & i" as well as .Popup j & "
for " & i


Let's look at those, first...

"j & " for " & i"
string + keyword + string = syntax error

j & " for " & i
variable + string + variable = *should* be working

Indeed, this works for me:

j = "A"
i = 65
CreateObject("WScript.Shell").Popup j & " for " & i, 2, "ASCII Select"

MsgBox j & " for " & i

CreateObject("WScript.Shell").Popup "Select another Capital Letter in K1
to convert to ASCII", _
2, "ASCII Select"

(The CreateObject... text will probably wrap)


You might try explicitly assigning the two variables to a string:

Dim tmp As String
tmp = j & " for " & i
CreateObject("WScript.Shell").Popup tmp, 2, "ASCII Select"

--
Revenge! I'm screaming revenge again!
  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 536
Default Variables in a Popup prompt

On Monday, February 11, 2013 1:19:13 AM UTC-8, Howard wrote:
Msgbox below works fine, returns a capital letter for j and an ASCII char for i.

The timed Popup works fine with prompt shown, want another timed Popup to display what the message box does and do away with the msgbox.

i and j are declared variable refering to two cells on the worksheet.



Possible?



I have tried to put the j and the i in the prompt section of this timed popup but it rejects .Popup "j & " for " & i" as well as .Popup j & " for " & i





MsgBox j & " for " & i



CreateObject("WScript.Shell").Popup "Select another Capital Letter in K1 to

convert to ASCII", _

2, "ASCII Select"



(The CreateObject... text will probably wrap)



Thanks,

Howard


Thanks Auric,
I could have sworn I tried this ....Popup j & " for " & i...
and it did not work...??? Does now!

I went with this and it works fine also.

Dim tmp As String
tmp = j & " for " & i
CreateObject("WScript.Shell").Popup tmp, 2, "ASCII Select"

However, if I try to run them both in the same macro the first one works fine but the second does indeed does popup but does not time out, just sits there until you hit OK or X. If I comment either one out the other works.

Have you any idea whats going on there?? One or the other but not both.

(yes ASCII value not char)
Thanks again for the help.
Howard
  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 538
Default Variables in a Popup prompt

Howard wrote:

On Monday, February 11, 2013 1:19:13 AM UTC-8, Howard wrote:
Msgbox below works fine, returns a capital letter for j and an ASCII
char for i.

The timed Popup works fine with prompt shown, want another timed Popup
to display what the message box does and do away with the msgbox.

i and j are declared variable refering to two cells on the worksheet.

Possible?

I have tried to put the j and the i in the prompt section of this timed
popup but it rejects .Popup "j & " for " & i" as well as .Popup j & "
for " & i

MsgBox j & " for " & i

CreateObject("WScript.Shell").Popup "Select another Capital Letter in
K1 to convert to ASCII", _
2, "ASCII Select"

(The CreateObject... text will probably wrap)


Thanks Auric,
I could have sworn I tried this ....Popup j & " for " & i...
and it did not work...??? Does now!

I went with this and it works fine also.

Dim tmp As String
tmp = j & " for " & i
CreateObject("WScript.Shell").Popup tmp, 2, "ASCII Select"

However, if I try to run them both in the same macro the first one works
fine but the second does indeed does popup but does not time out, just
sits there until you hit OK or X. If I comment either one out the other
works.

Have you any idea whats going on there?? One or the other but not both.


I have no idea.

Since you're using a scripting object, I recommend popping over to a VBScript
group and asking them. microsoft.public.scripting.vbscript looks fairly busy;
ask there. (Let them know you're calling from VBA, in case it makes a
difference.)

--
I like drawing devil ferrets.
  #5   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 536
Default Variables in a Popup prompt

On Monday, February 11, 2013 1:19:13 AM UTC-8, Howard wrote:
Msgbox below works fine, returns a capital letter for j and an ASCII char for i.

The timed Popup works fine with prompt shown, want another timed Popup to display what the message box does and do away with the msgbox.

i and j are declared variable refering to two cells on the worksheet.



Possible?



I have tried to put the j and the i in the prompt section of this timed popup but it rejects .Popup "j & " for " & i" as well as .Popup j & " for " & i





MsgBox j & " for " & i



CreateObject("WScript.Shell").Popup "Select another Capital Letter in K1 to

convert to ASCII", _

2, "ASCII Select"



(The CreateObject... text will probably wrap)



Thanks,

Howard


Thanks for the advice. I'm getting in a bit above my head on scripting objects and at the same time I'm finding the msgbox and the timed popup don't seem to add a great deal of value to the process. I'll most likely dump them.

I do appreciate you time and thoughts.

Regards,
Howard


  #6   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 538
Default Variables in a Popup prompt

Howard wrote:

On Monday, February 11, 2013 1:19:13 AM UTC-8, Howard wrote:
Msgbox below works fine, returns a capital letter for j and an ASCII
char for i.

The timed Popup works fine with prompt shown, want another timed Popup
to display what the message box does and do away with the msgbox.
i and j are declared variable refering to two cells on the worksheet.

Possible?

I have tried to put the j and the i in the prompt section of this timed
popup but it rejects .Popup "j & " for " & i" as well as .Popup j & "
for " & i

MsgBox j & " for " & i

CreateObject("WScript.Shell").Popup "Select another Capital Letter in
K1 to convert to ASCII", _
2, "ASCII Select"

(The CreateObject... text will probably wrap)


Thanks for the advice. I'm getting in a bit above my head on scripting
objects and at the same time I'm finding the msgbox and the timed popup
don't seem to add a great deal of value to the process. I'll most
likely dump them.

I do appreciate you time and thoughts.


No prob.

One last thought.. If you really want the timed msgbox, you could easily
make your own. Create a form with a label and an OK button, and add this
code to the form:

Public x As Single

Private Sub CommandButton1_Click()
Unload Me
End Sub

Private Sub UserForm_Activate()
x = Timer
Do
DoEvents
If Timer (x + 2!) Then Unload Me: Exit Sub
Loop
End Sub

Private Sub UserForm_Initialize()
Label1.Caption = some_public_variable
End Sub

The message would have to come from a public variable set by your code
(which I've called "some_public_variable" here). You'd use this like so:

Public some_public_variable As String

Sub foo()
j = "A"
i = 65
some_public_variable = j & " for " & i
UserForm1.Show
While UserForm1.Visible
DoEvents
Wend
End Sub

The downside of this is that the CPU usage will spike to 100% for those 2
seconds. (DoEvents will allow other things to happen so the machine doesn't
just lock completely up, but still.)

There are other ways of doing this (see Application.Wait, for example), but
you'll need to experiment to see if you like any of them. (A regular VB
timer control would solve all these problems, but I can't see how to add
one to the VBA form.)

--
You're complaining about grammar in spam?
Don't you have anything better to do?
Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Satisfying two variables entered via popup Colin Hayes Excel Discussion (Misc queries) 1 February 3rd 10 09:04 PM
How to use two parameters in input of popup Variables - Gary's Student Colin Hayes Excel Worksheet Functions 0 February 2nd 10 11:03 PM
Prompt for tab name and then prompt for number of iterations of ta bert_lady Excel Programming 2 August 27th 09 05:18 PM
variables in footers; how to prompt user for input within macro dangles Excel Programming 1 January 20th 06 11:17 PM
Entering variables on Msgbox prompt renegan[_6_] Excel Programming 3 January 4th 06 06:54 PM


All times are GMT +1. The time now is 10:51 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"