Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 191
Default ListFillRange

I have the following code in a procdu

Sheets("Home").OLEObjects("ListBox1").ListFillRang e =
Range("wrkshtrng").Address

The listbox window is blank. I have been using:

Sheets("Home").OLEObjects("ListBox1").ListFillRang e = "wrkshtrng"

But I have been having problems. I don't know if that is the cause of the
problems or not. Why is the first code not working?
Thanks
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default ListFillRange

After I named a range "wrkshtrng", this line...

Sheets("Home").OLEObjects("ListBox1").ListFillRang e =
Range("wrkshtrng").Address

worked fine for me.

Rick


"ranswrt" wrote in message
...
I have the following code in a procdu

Sheets("Home").OLEObjects("ListBox1").ListFillRang e =
Range("wrkshtrng").Address

The listbox window is blank. I have been using:

Sheets("Home").OLEObjects("ListBox1").ListFillRang e = "wrkshtrng"

But I have been having problems. I don't know if that is the cause of the
problems or not. Why is the first code not working?
Thanks


  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 191
Default ListFillRange

"wrkshtrng" is on a different sheet than the sheet with the listbox in, does
that make a difference?

"Rick Rothstein (MVP - VB)" wrote:

After I named a range "wrkshtrng", this line...

Sheets("Home").OLEObjects("ListBox1").ListFillRang e =
Range("wrkshtrng").Address

worked fine for me.

Rick


"ranswrt" wrote in message
...
I have the following code in a procdu

Sheets("Home").OLEObjects("ListBox1").ListFillRang e =
Range("wrkshtrng").Address

The listbox window is blank. I have been using:

Sheets("Home").OLEObjects("ListBox1").ListFillRang e = "wrkshtrng"

But I have been having problems. I don't know if that is the cause of the
problems or not. Why is the first code not working?
Thanks



  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 35,218
Default ListFillRange

Did you try all the other suggestions at your earlier post?

Just curious.

ranswrt wrote:

I have the following code in a procdu

Sheets("Home").OLEObjects("ListBox1").ListFillRang e =
Range("wrkshtrng").Address

The listbox window is blank. I have been using:

Sheets("Home").OLEObjects("ListBox1").ListFillRang e = "wrkshtrng"

But I have been having problems. I don't know if that is the cause of the
problems or not. Why is the first code not working?
Thanks


--

Dave Peterson
  #5   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 191
Default ListFillRange

Yes

"Dave Peterson" wrote:

Did you try all the other suggestions at your earlier post?

Just curious.

ranswrt wrote:

I have the following code in a procdu

Sheets("Home").OLEObjects("ListBox1").ListFillRang e =
Range("wrkshtrng").Address

The listbox window is blank. I have been using:

Sheets("Home").OLEObjects("ListBox1").ListFillRang e = "wrkshtrng"

But I have been having problems. I don't know if that is the cause of the
problems or not. Why is the first code not working?
Thanks


--

Dave Peterson



  #6   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 191
Default ListFillRange

I call this procedure alot when I'm running other procedu

Sub stopautocalc()
With Application
.ScreenUpdating = False
.EnableEvents = False
.Calculation = xlCalculationManual
End With
End Sub

Then I turn them back on again. Could this have anything to do with it?

"Dave Peterson" wrote:

Did you try all the other suggestions at your earlier post?

Just curious.

ranswrt wrote:

I have the following code in a procdu

Sheets("Home").OLEObjects("ListBox1").ListFillRang e =
Range("wrkshtrng").Address

The listbox window is blank. I have been using:

Sheets("Home").OLEObjects("ListBox1").ListFillRang e = "wrkshtrng"

But I have been having problems. I don't know if that is the cause of the
problems or not. Why is the first code not working?
Thanks


--

Dave Peterson

  #7   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 35,218
Default ListFillRange

I don't think so.

You really tried:

Sheets("Home").OLEObjects("ListBox1").ListFillRang e _
= Range("wrkshtrng").Address(external:=true)

Or being more specific:

Sheets("Home").OLEObjects("ListBox1").ListFillRang e _
= worksheets("somesheet").Range("wrkshtrng").Address (external:=true)



ranswrt wrote:

I call this procedure alot when I'm running other procedu

Sub stopautocalc()
With Application
.ScreenUpdating = False
.EnableEvents = False
.Calculation = xlCalculationManual
End With
End Sub

Then I turn them back on again. Could this have anything to do with it?

"Dave Peterson" wrote:

Did you try all the other suggestions at your earlier post?

Just curious.

ranswrt wrote:

I have the following code in a procdu

Sheets("Home").OLEObjects("ListBox1").ListFillRang e =
Range("wrkshtrng").Address

The listbox window is blank. I have been using:

Sheets("Home").OLEObjects("ListBox1").ListFillRang e = "wrkshtrng"

But I have been having problems. I don't know if that is the cause of the
problems or not. Why is the first code not working?
Thanks


--

Dave Peterson


--

Dave Peterson
  #8   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 191
Default ListFillRange

I changed
Sheets("Current DB") to worksheets("Current DB")
and added (external:=True)
That seemed to have fixed the problem.
Thanks for your help
"Dave Peterson" wrote:

I don't think so.

You really tried:

Sheets("Home").OLEObjects("ListBox1").ListFillRang e _
= Range("wrkshtrng").Address(external:=true)

Or being more specific:

Sheets("Home").OLEObjects("ListBox1").ListFillRang e _
= worksheets("somesheet").Range("wrkshtrng").Address (external:=true)



ranswrt wrote:

I call this procedure alot when I'm running other procedu

Sub stopautocalc()
With Application
.ScreenUpdating = False
.EnableEvents = False
.Calculation = xlCalculationManual
End With
End Sub

Then I turn them back on again. Could this have anything to do with it?

"Dave Peterson" wrote:

Did you try all the other suggestions at your earlier post?

Just curious.

ranswrt wrote:

I have the following code in a procdu

Sheets("Home").OLEObjects("ListBox1").ListFillRang e =
Range("wrkshtrng").Address

The listbox window is blank. I have been using:

Sheets("Home").OLEObjects("ListBox1").ListFillRang e = "wrkshtrng"

But I have been having problems. I don't know if that is the cause of the
problems or not. Why is the first code not working?
Thanks

--

Dave Peterson


--

Dave Peterson

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
ListFillRange not working Jeff Excel Programming 2 July 1st 05 03:36 PM
How to Set ListFillRange to Another Sheet Chaplain Doug Excel Programming 3 April 29th 05 01:54 PM
I can't figure out listfillrange LostinVA Excel Programming 6 April 15th 05 03:21 PM
ListFillRange Dave Baranas Excel Programming 0 August 12th 03 05:09 AM
ListFillRange Dave Baranas Excel Programming 1 August 11th 03 11:08 PM


All times are GMT +1. The time now is 04:02 PM.

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"