ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   Problem in Msgbox() (https://www.excelbanter.com/excel-discussion-misc-queries/156393-problem-msgbox.html)

ashish128

Problem in Msgbox()
 
Hi All,

I am facing a problem in Msgbox() function. I dont know if the problem
is caused by a limitation of msgbox or of Excel itself but I cant
figure it out.

Following is the exact (single) line of code I am using.

s = MsgBox("Trading Interest (Client) : " & financing_total & vbCrLf &
vbCrLf & corp_action & vbCrLf & vbCrLf & "CFD Dividend Received : " &
cfd_interest & vbCrLf & vbCrLf & "Equity Interest Received : " &
equity_interest & vbCrLf & vbCrLf & "Tax Amount : " & tax & vbCrLf &
" Purchase / Sale <<<<<<<<<<<<<<" & vbCrLf & vbCrLf &
" Equity ECU Equity S. Krona Equity
CHF" & vbCrLf & " (L:16, L:17) (O:16, O:
17) (Q:16, Q:17)" & vbCrLf & vbCrLf & "Purchase : " &
equity_eur_purchase_total & " " & equity_sek_purchase_total & " " &
equity_chf_purchase_total & vbCrLf & vbCrLf & "Sales : " &
equity_eur_sale_total & " " & equity_sek_sale_total & " " &
equity_chf_sale_total & vbCrLf & " Transfer to Future / Forex
<<<<<<<<<" & vbCrLf & "MS Equity ECU : " &
equity_transfer_to_future_forex_AC_EUR & " MS SWAP GBP1 : " &
Swap_transfer_to_future_forex_AC_GBP, vbOKOnly, "Please Note Down
financial Figur for Today")



I just want to add more spaces (and text) in between the message but
excel is not allowing me to add anything more in this line.

Is there a way to overcome this situation?

Please Help.

With Regards

Ashish Sharma


Bob Phillips

Problem in Msgbox()
 
Why don't you build a simple userform and setup the information in a nice
digestible manner rather than trying to cram it all into a MsgBox.

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"ashish128" wrote in message
ps.com...
Hi All,

I am facing a problem in Msgbox() function. I dont know if the problem
is caused by a limitation of msgbox or of Excel itself but I cant
figure it out.

Following is the exact (single) line of code I am using.

s = MsgBox("Trading Interest (Client) : " & financing_total & vbCrLf &
vbCrLf & corp_action & vbCrLf & vbCrLf & "CFD Dividend Received : " &
cfd_interest & vbCrLf & vbCrLf & "Equity Interest Received : " &
equity_interest & vbCrLf & vbCrLf & "Tax Amount : " & tax & vbCrLf &
" Purchase / Sale <<<<<<<<<<<<<<" & vbCrLf & vbCrLf &
" Equity ECU Equity S. Krona Equity
CHF" & vbCrLf & " (L:16, L:17) (O:16, O:
17) (Q:16, Q:17)" & vbCrLf & vbCrLf & "Purchase : " &
equity_eur_purchase_total & " " & equity_sek_purchase_total & " " &
equity_chf_purchase_total & vbCrLf & vbCrLf & "Sales : " &
equity_eur_sale_total & " " & equity_sek_sale_total & " " &
equity_chf_sale_total & vbCrLf & " Transfer to Future / Forex
<<<<<<<<<" & vbCrLf & "MS Equity ECU : " &
equity_transfer_to_future_forex_AC_EUR & " MS SWAP GBP1 : " &
Swap_transfer_to_future_forex_AC_GBP, vbOKOnly, "Please Note Down
financial Figur for Today")



I just want to add more spaces (and text) in between the message but
excel is not allowing me to add anything more in this line.

Is there a way to overcome this situation?

Please Help.

With Regards

Ashish Sharma




Kevin B

Problem in Msgbox()
 
You could declare a string variable and then build your message incrementally:

Dim strMsg as string

strMsg = "Trading Interest (Client) : " & financing_total & vbCrLf
strMsg = strMsg & vbCrLf & corp_action & vbCrLf & vbCrLf &
strMsg = strMsg & "CFD Dividend Received : "

and continue building the message until complete

Then your msgbox statement would be

s = MsgBox(strMsg, vbOKOnly, "Please Note Down
financial Figur for Today")


Kevin Backmann


"ashish128" wrote:

Hi All,

I am facing a problem in Msgbox() function. I dont know if the problem
is caused by a limitation of msgbox or of Excel itself but I cant
figure it out.

Following is the exact (single) line of code I am using.

s = MsgBox("Trading Interest (Client) : " & financing_total & vbCrLf &
vbCrLf & corp_action & vbCrLf & vbCrLf & "CFD Dividend Received : " &
cfd_interest & vbCrLf & vbCrLf & "Equity Interest Received : " &
equity_interest & vbCrLf & vbCrLf & "Tax Amount : " & tax & vbCrLf &
" Purchase / Sale <<<<<<<<<<<<<<" & vbCrLf & vbCrLf &
" Equity ECU Equity S. Krona Equity
CHF" & vbCrLf & " (L:16, L:17) (O:16, O:
17) (Q:16, Q:17)" & vbCrLf & vbCrLf & "Purchase : " &
equity_eur_purchase_total & " " & equity_sek_purchase_total & " " &
equity_chf_purchase_total & vbCrLf & vbCrLf & "Sales : " &
equity_eur_sale_total & " " & equity_sek_sale_total & " " &
equity_chf_sale_total & vbCrLf & " Transfer to Future / Forex
<<<<<<<<<" & vbCrLf & "MS Equity ECU : " &
equity_transfer_to_future_forex_AC_EUR & " MS SWAP GBP1 : " &
Swap_transfer_to_future_forex_AC_GBP, vbOKOnly, "Please Note Down
financial Figur for Today")



I just want to add more spaces (and text) in between the message but
excel is not allowing me to add anything more in this line.

Is there a way to overcome this situation?

Please Help.

With Regards

Ashish Sharma



ashish128

Problem in Msgbox()
 
On Aug 30, 2:36 pm, "Bob Phillips" wrote:
Why don't you build a simple userform and setup the information in a nice
digestible manner rather than trying to cram it all into a MsgBox.

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"ashish128" wrote in message

ps.com...



Hi All,


I am facing a problem in Msgbox() function. I dont know if the problem
is caused by a limitation of msgbox or of Excel itself but I cant
figure it out.


Following is the exact (single) line of code I am using.


s = MsgBox("Trading Interest (Client) : " & financing_total & vbCrLf &
vbCrLf & corp_action & vbCrLf & vbCrLf & "CFD Dividend Received : " &
cfd_interest & vbCrLf & vbCrLf & "Equity Interest Received : " &
equity_interest & vbCrLf & vbCrLf & "Tax Amount : " & tax & vbCrLf &
" Purchase / Sale <<<<<<<<<<<<<<" & vbCrLf & vbCrLf &
" Equity ECU Equity S. Krona Equity
CHF" & vbCrLf & " (L:16, L:17) (O:16, O:
17) (Q:16, Q:17)" & vbCrLf & vbCrLf & "Purchase : " &
equity_eur_purchase_total & " " & equity_sek_purchase_total & " " &
equity_chf_purchase_total & vbCrLf & vbCrLf & "Sales : " &
equity_eur_sale_total & " " & equity_sek_sale_total & " " &
equity_chf_sale_total & vbCrLf & " Transfer to Future / Forex
<<<<<<<<<" & vbCrLf & "MS Equity ECU : " &
equity_transfer_to_future_forex_AC_EUR & " MS SWAP GBP1 : " &
Swap_transfer_to_future_forex_AC_GBP, vbOKOnly, "Please Note Down
financial Figur for Today")


I just want to add more spaces (and text) in between the message but
excel is not allowing me to add anything more in this line.


Is there a way to overcome this situation?


Please Help.


With Regards


Ashish Sharma- Hide quoted text -


- Show quoted text -


Thanks Bob but I dont know what a userform is and how to make it.


ashish128

Problem in Msgbox()
 
On Aug 30, 5:56 pm, Kevin B wrote:
You could declare a string variable and then build your message incrementally:

Dim strMsg as string

strMsg = "Trading Interest (Client) : " & financing_total & vbCrLf
strMsg = strMsg & vbCrLf & corp_action & vbCrLf & vbCrLf &
strMsg = strMsg & "CFD Dividend Received : "

and continue building the message until complete

Then your msgbox statement would be

s = MsgBox(strMsg, vbOKOnly, "Please Note Down
financial Figur for Today")

Kevin Backmann



"ashish128" wrote:
Hi All,


I am facing a problem in Msgbox() function. I dont know if the problem
is caused by a limitation of msgbox or of Excel itself but I cant
figure it out.


Following is the exact (single) line of code I am using.


s = MsgBox("Trading Interest (Client) : " & financing_total & vbCrLf &
vbCrLf & corp_action & vbCrLf & vbCrLf & "CFD Dividend Received : " &
cfd_interest & vbCrLf & vbCrLf & "Equity Interest Received : " &
equity_interest & vbCrLf & vbCrLf & "Tax Amount : " & tax & vbCrLf &
" Purchase / Sale <<<<<<<<<<<<<<" & vbCrLf & vbCrLf &
" Equity ECU Equity S. Krona Equity
CHF" & vbCrLf & " (L:16, L:17) (O:16, O:
17) (Q:16, Q:17)" & vbCrLf & vbCrLf & "Purchase : " &
equity_eur_purchase_total & " " & equity_sek_purchase_total & " " &
equity_chf_purchase_total & vbCrLf & vbCrLf & "Sales : " &
equity_eur_sale_total & " " & equity_sek_sale_total & " " &
equity_chf_sale_total & vbCrLf & " Transfer to Future / Forex
<<<<<<<<<" & vbCrLf & "MS Equity ECU : " &
equity_transfer_to_future_forex_AC_EUR & " MS SWAP GBP1 : " &
Swap_transfer_to_future_forex_AC_GBP, vbOKOnly, "Please Note Down
financial Figur for Today")


I just want to add more spaces (and text) in between the message but
excel is not allowing me to add anything more in this line.


Is there a way to overcome this situation?


Please Help.


With Regards


Ashish Sharma- Hide quoted text -


- Show quoted text -


Thanks Kevin, It worked like a charm.

Many thanks to you.



All times are GMT +1. The time now is 08:26 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com