convert $A$12 to a value

EDUCATED MONKEY

Board Regular
Joined
Jul 17, 2011
Messages
218
Hi I have a couple of issues that I could do with a hand with<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /><o:p></o:p>
1 how do I convert $A$12 so I can use the value in a delete scenario <o:p></o:p>
e.g. Sheets("Sheet1").Select<o:p></o:p>
Range("A3: $A$12 ").Select this does not work<o:p></o:p>
Range("A3:A12").Select this does <o:p></o:p>
Selection.Delete Shift:=xlUp<o:p></o:p>
2 some times one or more item are missing from the list of things to find and it crashes please see code below <o:p></o:p>
3 I know the answer to this but I just can not remember it right now so I will ask <o:p></o:p>
How do I copy arrange of cells in this case C3 to H3 to next available row on another sheet <o:p></o:p>
Code:
Sub FindString()
    Dim Found As Range
    
    
    Set Found = ActiveSheet.UsedRange.Find("title", LookIn:=xlValues, lookat:=xlPart)
     Range("C1") = Trim(Found.Value)
    
     
     Range("C2") = Len(Trim(Found.Value))
     Set Found = ActiveSheet.UsedRange.Find("author", LookIn:=xlValues, lookat:=xlPart)
     Range("D1") = Trim(Found.Value)
     Range("D2") = Len(Trim(Found.Value))
     Set Found = ActiveSheet.UsedRange.Find("basic", LookIn:=xlValues, lookat:=xlPart)
     Range("E1") = Trim(Found.Value)
     Range("E2") = Len(Trim(Found.Value))
     Set Found = ActiveSheet.UsedRange.Find("language", LookIn:=xlValues, lookat:=xlPart)
     Range("F1") = Trim(Found.Value)
    'Range("F2") = Len(Trim(Found.Value))
     Set Found = ActiveSheet.UsedRange.Find("synopsis", LookIn:=xlValues, lookat:=xlPart)
    Range("G1") = Trim(Found.Value)
    Range("G2") = Len(Trim(Found.Value))
     Set Found = ActiveSheet.UsedRange.Find("imageurl", LookIn:=xlValues, lookat:=xlPart)
    Range("H1") = Trim(Found.Value)
    'Range("H2") = Len(Trim(Found.Value))
    
End Sub
 
Very well.
I'll just say, I know you're on a path to sorting things out ...
For the next html parser project:
Take a look at these two Reference libraries:
WinHttp
Microsoft HTML Object Library

They can make the parsing of HTML more bearable.
Thank you seem to be over the worst just got an annoying problem just posted if you get a minuet <?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /><o:p></o:p>
I decided upon the viable version so I can change at will if necessary <o:p></o:p>
 
Upvote 0

Excel Facts

Select all contiguous cells
Pressing Ctrl+* (asterisk) will select the "current region" - all contiguous cells in all directions.

Forum statistics

Threads
1,224,594
Messages
6,179,792
Members
452,942
Latest member
VijayNewtoExcel

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top