Macro Help Please?

Btobin0 · 05-29-2006, 09:20 PM

I have this macro that copies information for a selected cell. It uses the
information to goto a weblink copies the information and returns it to z3. my
problem is that i only need information from the b cells but it is grabing
the a cells as well. As suggestions?
weblink http://www.geocities.com/btobin0/17May2006.html
excel cells = Z2 for active cell : Z3 to paste information
information in z2 = 17May2006

macro:

Sub Macro3()

'ActiveCell.Value
Selection.Copy
'Application.CutCopyMode = False
'Application.DisplayAlerts = False
Workbooks.Open Filename:= _
"http://www.geocities.com/btobin0/" & ActiveCell.Value & ".html"
Range("B10").Select
Selection.UnMerge
Range("B10:B20", "B22:B32").Select
Selection.Copy
ActiveWorkbook.Close
'Application.DisplayAlerts = False
Sheets("Sheet1").Select
Range("z3").Select
ActiveSheet.Paste

End Sub

Jim Cone · 05-29-2006, 09:53 PM

The range you are selecting is actually B10:B32.
If there are any merged cells in that range then the actual range
will be different. Your unmerge command may not have
cleared all of the entire range.
--
Jim Cone
San Francisco, USA
http://www.realezsites.com/bus/primitivesoftware

"Btobin0" <Btobin0@discussions.microsoft.com>
wrote in message
I have this macro that copies information for a selected cell. It uses the
information to goto a weblink copies the information and returns it to z3. my
problem is that i only need information from the b cells but it is grabing
the a cells as well. As suggestions?
weblink http://www.geocities.com/btobin0/17May2006.html
excel cells = Z2 for active cell : Z3 to paste information
information in z2 = 17May2006
macro:
Sub Macro3()

'ActiveCell.Value
Selection.Copy
'Application.CutCopyMode = False
'Application.DisplayAlerts = False
Workbooks.Open Filename:= _
"http://www.geocities.com/btobin0/" & ActiveCell.Value & ".html"
Range("B10").Select
Selection.UnMerge
Range("B10:B20", "B22:B32").Select
Selection.Copy
ActiveWorkbook.Close
'Application.DisplayAlerts = False
Sheets("Sheet1").Select
Range("z3").Select
ActiveSheet.Paste

End Sub

Btobin0 · 05-29-2006, 10:10 PM

How can I use B10:B32 and unmerge B22. I have tried everything i could think
of and nothing worked. Can you give it to me?

"Jim Cone" wrote:

> The range you are selecting is actually B10:B32.
> If there are any merged cells in that range then the actual range
> will be different. Your unmerge command may not have
> cleared all of the entire range.
> --
> Jim Cone
> San Francisco, USA
> http://www.realezsites.com/bus/primitivesoftware
>
>
>
> "Btobin0" <Btobin0@discussions.microsoft.com>
> wrote in message
> I have this macro that copies information for a selected cell. It uses the
> information to goto a weblink copies the information and returns it to z3. my
> problem is that i only need information from the b cells but it is grabing
> the a cells as well. As suggestions?
> weblink http://www.geocities.com/btobin0/17May2006.html
> excel cells = Z2 for active cell : Z3 to paste information
> information in z2 = 17May2006
> macro:
> Sub Macro3()
>
> 'ActiveCell.Value
> Selection.Copy
> 'Application.CutCopyMode = False
> 'Application.DisplayAlerts = False
> Workbooks.Open Filename:= _
> "http://www.geocities.com/btobin0/" & ActiveCell.Value & ".html"
> Range("B10").Select
> Selection.UnMerge
> Range("B10:B20", "B22:B32").Select
> Selection.Copy
> ActiveWorkbook.Close
> 'Application.DisplayAlerts = False
> Sheets("Sheet1").Select
> Range("z3").Select
> ActiveSheet.Paste
>
> End Sub
>

Jim Cone · 05-29-2006, 11:00 PM

Try this...

With Range("B10:B32")
.UnMerge
.Copy
End With
--
Jim Cone
San Francisco, USA
http://www.officeletter.com/blink/specialsort.html

"Btobin0" <Btobin0@discussions.microsoft.com>
wrote in message
How can I use B10:B32 and unmerge B22. I have tried everything i could think
of and nothing worked. Can you give it to me?

"Jim Cone" wrote:
> The range you are selecting is actually B10:B32.
> If there are any merged cells in that range then the actual range
> will be different. Your unmerge command may not have
> cleared all of the entire range.
> --
> Jim Cone
> San Francisco, USA
> http://www.realezsites.com/bus/primitivesoftware
>
>
>
> "Btobin0" <Btobin0@discussions.microsoft.com>
> wrote in message
> I have this macro that copies information for a selected cell. It uses the
> information to goto a weblink copies the information and returns it to z3. my
> problem is that i only need information from the b cells but it is grabing
> the a cells as well. As suggestions?
> weblink http://www.geocities.com/btobin0/17May2006.html
> excel cells = Z2 for active cell : Z3 to paste information
> information in z2 = 17May2006
> macro:
> Sub Macro3()
>
> 'ActiveCell.Value
> Selection.Copy
> 'Application.CutCopyMode = False
> 'Application.DisplayAlerts = False
> Workbooks.Open Filename:= _
> "http://www.geocities.com/btobin0/" & ActiveCell.Value & ".html"
> Range("B10").Select
> Selection.UnMerge
> Range("B10:B20", "B22:B32").Select
> Selection.Copy
> ActiveWorkbook.Close
> 'Application.DisplayAlerts = False
> Sheets("Sheet1").Select
> Range("z3").Select
> ActiveSheet.Paste
>
> End Sub
>

Btobin0 · 05-30-2006, 05:10 PM

When I add this it only grabs one cell B10 and nothing below it.

"Jim Cone" wrote:

> Try this...
>
> With Range("B10:B32")
> .UnMerge
> .Copy
> End With
> --
> Jim Cone
> San Francisco, USA
> http://www.officeletter.com/blink/specialsort.html
>
>
>
> "Btobin0" <Btobin0@discussions.microsoft.com>
> wrote in message
> How can I use B10:B32 and unmerge B22. I have tried everything i could think
> of and nothing worked. Can you give it to me?
>
> "Jim Cone" wrote:
> > The range you are selecting is actually B10:B32.
> > If there are any merged cells in that range then the actual range
> > will be different. Your unmerge command may not have
> > cleared all of the entire range.
> > --
> > Jim Cone
> > San Francisco, USA
> > http://www.realezsites.com/bus/primitivesoftware
> >
> >
> >
> > "Btobin0" <Btobin0@discussions.microsoft.com>
> > wrote in message
> > I have this macro that copies information for a selected cell. It uses the
> > information to goto a weblink copies the information and returns it to z3. my
> > problem is that i only need information from the b cells but it is grabing
> > the a cells as well. As suggestions?
> > weblink http://www.geocities.com/btobin0/17May2006.html
> > excel cells = Z2 for active cell : Z3 to paste information
> > information in z2 = 17May2006
> > macro:
> > Sub Macro3()
> >
> > 'ActiveCell.Value
> > Selection.Copy
> > 'Application.CutCopyMode = False
> > 'Application.DisplayAlerts = False
> > Workbooks.Open Filename:= _
> > "http://www.geocities.com/btobin0/" & ActiveCell.Value & ".html"
> > Range("B10").Select
> > Selection.UnMerge
> > Range("B10:B20", "B22:B32").Select
> > Selection.Copy
> > ActiveWorkbook.Close
> > 'Application.DisplayAlerts = False
> > Sheets("Sheet1").Select
> > Range("z3").Select
> > ActiveSheet.Paste
> >
> > End Sub
> >
>

Jim Cone · 05-30-2006, 06:15 PM

That would be a first.
Maybe you should post most/all of your code.
Jim Cone

"Btobin0" <Btobin0@discussions.microsoft.com> wrote in message news:C36D42DE-4E80-454F-960B-902D774B26C1@microsoft.com...
When I add this it only grabs one cell B10 and nothing below it.

"Jim Cone" wrote:

> Try this...
>
> With Range("B10:B32")
> .UnMerge
> .Copy
> End With
> --
> Jim Cone
> San Francisco, USA
> http://www.officeletter.com/blink/specialsort.html
>
>
>
> "Btobin0" <Btobin0@discussions.microsoft.com>
> wrote in message
> How can I use B10:B32 and unmerge B22. I have tried everything i could think
> of and nothing worked. Can you give it to me?
>
> "Jim Cone" wrote:
> > The range you are selecting is actually B10:B32.
> > If there are any merged cells in that range then the actual range
> > will be different. Your unmerge command may not have
> > cleared all of the entire range.
> > --
> > Jim Cone
> > San Francisco, USA
> > http://www.realezsites.com/bus/primitivesoftware
> >
> >
> >
> > "Btobin0" <Btobin0@discussions.microsoft.com>
> > wrote in message
> > I have this macro that copies information for a selected cell. It uses the
> > information to goto a weblink copies the information and returns it to z3. my
> > problem is that i only need information from the b cells but it is grabing
> > the a cells as well. As suggestions?
> > weblink http://www.geocities.com/btobin0/17May2006.html
> > excel cells = Z2 for active cell : Z3 to paste information
> > information in z2 = 17May2006
> > macro:
> > Sub Macro3()
> >
> > 'ActiveCell.Value
> > Selection.Copy
> > 'Application.CutCopyMode = False
> > 'Application.DisplayAlerts = False
> > Workbooks.Open Filename:= _
> > "http://www.geocities.com/btobin0/" & ActiveCell.Value & ".html"
> > Range("B10").Select
> > Selection.UnMerge
> > Range("B10:B20", "B22:B32").Select
> > Selection.Copy
> > ActiveWorkbook.Close
> > 'Application.DisplayAlerts = False
> > Sheets("Sheet1").Select
> > Range("z3").Select
> > ActiveSheet.Paste
> >
> > End Sub
> >
>