ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   With Application; Me.Top = ... (https://www.excelbanter.com/excel-programming/410573-application%3B-me-top-%3D.html)

David

With Application; Me.Top = ...
 
With Application
Me.Top = 0
Me.Left = 625
End With

Just hoping to advance my knowledge..
An old post of Norman Jones gave the above solution to initial positioning
of a userform on the screen using a With structure - works great.
I use 'With Structures' but this code is in a form that I've not come across
yet so it caught my eye.
I tried to educate myself by typing out the instruction without the With
Structure, eg: Application.me.top etc but I'm obviously missing a trick. Can
anyone advise what the code looks like without the 'With'?
Thanks in advance


John Bundy

With Application; Me.Top = ...
 
the me is not necessary, you can just use
with application
..top=0
..left=625
end with

I use the me's as well. So just typing it without the with:
application.top=0
application.left=625

the with just lets you set multiple properties without retyping application.
--
-John
Please rate when your question is answered to help us and others know what
is helpful.


"David" wrote:

With Application
Me.Top = 0
Me.Left = 625
End With

Just hoping to advance my knowledge..
An old post of Norman Jones gave the above solution to initial positioning
of a userform on the screen using a With structure - works great.
I use 'With Structures' but this code is in a form that I've not come across
yet so it caught my eye.
I tried to educate myself by typing out the instruction without the With
Structure, eg: Application.me.top etc but I'm obviously missing a trick. Can
anyone advise what the code looks like without the 'With'?
Thanks in advance


Bob Phillips

With Application; Me.Top = ...
 
Me.Top = 0
Me.Left = 625

The With Application seems superfluous to me in this code snippet.

--
HTH

Bob

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

"David" wrote in message
...
With Application
Me.Top = 0
Me.Left = 625
End With

Just hoping to advance my knowledge..
An old post of Norman Jones gave the above solution to initial positioning
of a userform on the screen using a With structure - works great.
I use 'With Structures' but this code is in a form that I've not come
across
yet so it caught my eye.
I tried to educate myself by typing out the instruction without the With
Structure, eg: Application.me.top etc but I'm obviously missing a trick.
Can
anyone advise what the code looks like without the 'With'?
Thanks in advance




David

With Application; Me.Top = ...
 
Thanks John,
The code is in a userform 'Activate' procedure
The 'me' must be referring to the userform
The 'with structure' in the original post sets the initial position of the
userform and not the excel application. (Your code sets the position of the
excel application on the screen)
Could you advise further on how the code is working? ie: How to write the
instructions without the 'With'
Thanks again

"John Bundy" wrote:

the me is not necessary, you can just use
with application
.top=0
.left=625
end with

I use the me's as well. So just typing it without the with:
application.top=0
application.left=625

the with just lets you set multiple properties without retyping application.
--
-John
Please rate when your question is answered to help us and others know what
is helpful.


"David" wrote:

With Application
Me.Top = 0
Me.Left = 625
End With

Just hoping to advance my knowledge..
An old post of Norman Jones gave the above solution to initial positioning
of a userform on the screen using a With structure - works great.
I use 'With Structures' but this code is in a form that I've not come across
yet so it caught my eye.
I tried to educate myself by typing out the instruction without the With
Structure, eg: Application.me.top etc but I'm obviously missing a trick. Can
anyone advise what the code looks like without the 'With'?
Thanks in advance


John Bundy

With Application; Me.Top = ...
 
Ah, must have missed that part. In that case just use me.top, no application
is neccesary.
--
-John
Please rate when your question is answered to help us and others know what
is helpful.


"David" wrote:

Thanks John,
The code is in a userform 'Activate' procedure
The 'me' must be referring to the userform
The 'with structure' in the original post sets the initial position of the
userform and not the excel application. (Your code sets the position of the
excel application on the screen)
Could you advise further on how the code is working? ie: How to write the
instructions without the 'With'
Thanks again

"John Bundy" wrote:

the me is not necessary, you can just use
with application
.top=0
.left=625
end with

I use the me's as well. So just typing it without the with:
application.top=0
application.left=625

the with just lets you set multiple properties without retyping application.
--
-John
Please rate when your question is answered to help us and others know what
is helpful.


"David" wrote:

With Application
Me.Top = 0
Me.Left = 625
End With

Just hoping to advance my knowledge..
An old post of Norman Jones gave the above solution to initial positioning
of a userform on the screen using a With structure - works great.
I use 'With Structures' but this code is in a form that I've not come across
yet so it caught my eye.
I tried to educate myself by typing out the instruction without the With
Structure, eg: Application.me.top etc but I'm obviously missing a trick. Can
anyone advise what the code looks like without the 'With'?
Thanks in advance


David

With Application; Me.Top = ...
 
Thanks Bob,
It is superfluous, but what intrigues me is what would each line of code
look like with the 'Application' and 'Me.Top = 0' joined up into the same
line of code. Perhaps i'm looking for something that is not there and 'With
Application' 'End With' could be written around any set of instructions
without making any difference at all?

"Bob Phillips" wrote:

Me.Top = 0
Me.Left = 625

The With Application seems superfluous to me in this code snippet.

--
HTH

Bob

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

"David" wrote in message
...
With Application
Me.Top = 0
Me.Left = 625
End With

Just hoping to advance my knowledge..
An old post of Norman Jones gave the above solution to initial positioning
of a userform on the screen using a With structure - works great.
I use 'With Structures' but this code is in a form that I've not come
across
yet so it caught my eye.
I tried to educate myself by typing out the instruction without the With
Structure, eg: Application.me.top etc but I'm obviously missing a trick.
Can
anyone advise what the code looks like without the 'With'?
Thanks in advance





John Bundy

With Application; Me.Top = ...
 
You might be having an issue because of how he structures it, application
contains the me, he has it but does not need it. I know that made no sense so
have a look at another way to do what he did:

With Me
..Top = 0
..Left = 150
End With

this works the same way and is easier to write and (i think) comprehend how
it would break down into
me.top=0
me.left=150

--
-John
Please rate when your question is answered to help us and others know what
is helpful.


"David" wrote:

Thanks Bob,
It is superfluous, but what intrigues me is what would each line of code
look like with the 'Application' and 'Me.Top = 0' joined up into the same
line of code. Perhaps i'm looking for something that is not there and 'With
Application' 'End With' could be written around any set of instructions
without making any difference at all?

"Bob Phillips" wrote:

Me.Top = 0
Me.Left = 625

The With Application seems superfluous to me in this code snippet.

--
HTH

Bob

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

"David" wrote in message
...
With Application
Me.Top = 0
Me.Left = 625
End With

Just hoping to advance my knowledge..
An old post of Norman Jones gave the above solution to initial positioning
of a userform on the screen using a With structure - works great.
I use 'With Structures' but this code is in a form that I've not come
across
yet so it caught my eye.
I tried to educate myself by typing out the instruction without the With
Structure, eg: Application.me.top etc but I'm obviously missing a trick.
Can
anyone advise what the code looks like without the 'With'?
Thanks in advance





Dave Peterson

With Application; Me.Top = ...
 
Only those properties/methods that start with a dot refer to the object in the
previous With statement.

Your code would have to look more like:

With Application
.Me.Top = 0
.Me.Left = 625
End With

And in this case, it's not right.

David wrote:

Thanks Bob,
It is superfluous, but what intrigues me is what would each line of code
look like with the 'Application' and 'Me.Top = 0' joined up into the same
line of code. Perhaps i'm looking for something that is not there and 'With
Application' 'End With' could be written around any set of instructions
without making any difference at all?

"Bob Phillips" wrote:

Me.Top = 0
Me.Left = 625

The With Application seems superfluous to me in this code snippet.

--
HTH

Bob

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

"David" wrote in message
...
With Application
Me.Top = 0
Me.Left = 625
End With

Just hoping to advance my knowledge..
An old post of Norman Jones gave the above solution to initial positioning
of a userform on the screen using a With structure - works great.
I use 'With Structures' but this code is in a form that I've not come
across
yet so it caught my eye.
I tried to educate myself by typing out the instruction without the With
Structure, eg: Application.me.top etc but I'm obviously missing a trick.
Can
anyone advise what the code looks like without the 'With'?
Thanks in advance





--

Dave Peterson

Bob Phillips

With Application; Me.Top = ...
 
It doesn't get joined up because the Application is not qualifying Me, there
is no dot before Me.

--
HTH

Bob

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

"David" wrote in message
...
Thanks Bob,
It is superfluous, but what intrigues me is what would each line of code
look like with the 'Application' and 'Me.Top = 0' joined up into the same
line of code. Perhaps i'm looking for something that is not there and
'With
Application' 'End With' could be written around any set of instructions
without making any difference at all?

"Bob Phillips" wrote:

Me.Top = 0
Me.Left = 625

The With Application seems superfluous to me in this code snippet.

--
HTH

Bob

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

"David" wrote in message
...
With Application
Me.Top = 0
Me.Left = 625
End With

Just hoping to advance my knowledge..
An old post of Norman Jones gave the above solution to initial
positioning
of a userform on the screen using a With structure - works great.
I use 'With Structures' but this code is in a form that I've not come
across
yet so it caught my eye.
I tried to educate myself by typing out the instruction without the
With
Structure, eg: Application.me.top etc but I'm obviously missing a
trick.
Can
anyone advise what the code looks like without the 'With'?
Thanks in advance







David

With Application; Me.Top = ...
 
Thanks Bob, John & Dave for clearing that one up.
I'm sure I speak for 100s of people in saying that you do an excellent job
of improving our understanding of VBA
Thanks again




All times are GMT +1. The time now is 03:07 PM.

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