Re "With" not having components ...
I suppose what I'm getting at is that it's important not to think of
With as a component in its own right. It's just a shorthand way of
writing code. E.g.
With Mem_FirstMM
.SelStart = 0
.SelLength = Len(.Text)
End With
is the same as simply saying
Mem_FirstMM.SelStart = 0
Mem_FirstMM.SelLength = Len(.Text)
So, it's important to remember that it's the Mem_FirstMM components you
are accessing.
This becomes more relevant when you have complicated With constructs
(either nested or comma separated in the one With) and you have to keep
track of which objects the With is providing you shorthand access to.
Some people hate With and won't use it. Certainly, code with nested or
comma-separated With items can very quickly become unreadable.
Regards, Dave S
________________________________
From: ExcelVBA@yahoogroups.com [mailto:ExcelVBA@yahoogroups.com] On
Behalf Of noskosteve
Sent: Tuesday, 30 October 2012 13:49
To: ExcelVBA@yahoogroups.com
Subject: [ExcelVBA] Re: XL2007 Unable to select Form TextBox with code
Couldn't wait. My method works fine...
> I don't have a bad-value test ...
I understood your example 100% & wasn't question it, sorry.
> "Call" is ... not required... parameters ... inside parentheses
I know this. I Shouldn't have mentioned it. I just don't usually include
it for Msg boxes.
> I had the MsgBox inside the With because I included
> the .Text from the textbox in its parameters.
Ahhh! Some of this does make sense, Steve. I sez to self. I'll keep that
trick in mind.
> > I understand the With TextBox and its components ...
> A With doesn't have components, it simply makes the
> components of the TextBox available ...
Ah well. A Rose is a Flower. I picked that term not knowing if there was
better jargon figuring you'd know what I meant, but I still think it
flys ok. They could be considered components of the With as well, no?
... parameters...operands... arguments, even (for argument sake...so to
speak)(;-)
Here's my functioning snippet - cool to see text now selected. (I also
played with some of the things to help understand the function of each -
especially the Cancel.Value)
. If Mem_FirstMM < 1 Then
. MsgBox "The First memory can not be < 1 ..." ' detail omitted
. With Mem_FirstMM
. .SelStart = 0 ' Cusor at left
. .SelLength = Len(.Text) ' Nice touch. Select it all
. End With
. Cancel.Value = True ' kill User goof.
. End If
Thanks, Steve N.
... Still playing ...
----------
Visit our website at http://www.ubs.com
This message contains confidential information and is intended only
for the individual named. If you are not the named addressee you
should not disseminate, distribute or copy this e-mail. Please
notify the sender immediately by e-mail if you have received this
e-mail by mistake and delete this e-mail from your system.
E-mails are not encrypted and cannot be guaranteed to be secure or
error-free as information could be intercepted, corrupted, lost,
destroyed, arrive late or incomplete, or contain viruses. The sender
therefore does not accept liability for any errors or omissions in the
contents of this message which arise as a result of e-mail transmission.
If verification is required please request a hard-copy version. This
message is provided for informational purposes and should not be
construed as a solicitation or offer to buy or sell any securities
or related financial instruments.
UBS reserves the right to retain all messages. Messages are protected
and accessed only in legally justified cases.
[Non-text portions of this message have been removed]
| Reply via web post | Reply to sender | Reply to group | Start a New Topic | Messages in this topic (12) |
Be sure to check out TechTrax Ezine for many, free Excel VBA articles! Go here: http://www.mousetrax.com/techtrax to enter the ezine, then search the ARCHIVES for EXCEL VBA.
----------------------------------
Visit our ExcelVBA group home page for more info and support files:
http://groups.yahoo.com/group/ExcelVBA
----------------------------------
More free tutorials and resources available at:
http://www.mousetrax.com
----------------------------------
Tidak ada komentar:
Posting Komentar