DCCD Posted June 22, 2009 Share Posted June 22, 2009 (edited) Simple macros in Excel using the macro recorder Sub Macro() Range("a204:i51").Select With Selection.Borders(xlEdgeBottom) .LineStyle = xlContinuous .Weight = xlThick .ColorIndex = xlAutomatic End With End Sub How to do it with AutoIt just i can't get ".Weight" And ".ColorIndex" to work!! With $MyObject.ActiveSheet .range("A" & $A & ":i51" ).Borders($xlEdgeBottom).LineStyle = $xlContinuous .Weight = $xlThin .ColorIndex = $xlAutomatic EndWith Edited June 22, 2009 by DCCD [u][font=Arial Black]M[/font]y Blog, AVSS Parts[/u][font=Arial Black]Else[/font][font=Arial Black]L[/font]ibya Linux Users Group Link to comment Share on other sites More sharing options...
Malkey Posted June 22, 2009 Share Posted June 22, 2009 (edited) Simple macros in Excel using the macro recorder Sub Macro() Range("a204:i51").Select With Selection.Borders(xlEdgeBottom) .LineStyle = xlContinuous .Weight = xlThick .ColorIndex = xlAutomatic End With End Sub How to do it with AutoIt just i can't get ".Weight" And ".ColorIndex" to work!! With $MyObject.ActiveSheet .range("A" & $A & ":i51" ).Borders($xlEdgeBottom).LineStyle = $xlContinuous .Weight = $xlThin .ColorIndex = $xlAutomatic EndWithTry this. ; #include <Excel.au3> Local $oExcel = _ExcelBookNew();Create new book, make it visible #cs Sub Macro() Range("a204:i51").Select With Selection.Borders(xlEdgeBottom) .LineStyle = xlContinuous .Weight = xlThick .ColorIndex = xlAutomatic End With End Sub #ce Local $A = 204 With $oExcel.ActiveSheet .range("A" & $A & ":i51" ).Select .range("A" & $A & ":i51" ).Borders($xlEdgeBottom).LineStyle = $xlContinuous .range("A" & $A & ":i51" ).Borders($xlEdgeBottom).Weight = $xlThick .range("A" & $A & ":i51" ).Borders($xlEdgeBottom).ColorIndex = $xlAutomatic EndWith ; Edit: This looks better. With $oExcel.ActiveSheet.range("A" & $A & ":i51" ) .Select .Borders($xlEdgeBottom).LineStyle = $xlContinuous .Borders($xlEdgeBottom).Weight = $xlThick .Borders($xlEdgeBottom).ColorIndex = $xlAutomatic EndWith Edited June 22, 2009 by Malkey Link to comment Share on other sites More sharing options...
DCCD Posted June 22, 2009 Author Share Posted June 22, 2009 (edited) MalkeyTHANK YOU SO MUCH FOR HELPING ME, That's really cool Edited June 22, 2009 by DCCD [u][font=Arial Black]M[/font]y Blog, AVSS Parts[/u][font=Arial Black]Else[/font][font=Arial Black]L[/font]ibya Linux Users Group Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now