I've recorded a simple macro for Excel, where I work with a row. But I want
to work with a row the active cell is on, but Macro Recorder has writen me
an absolute referencing. Should anyone help me, how to rewrite the code?

Sub Za¹edìní_øádku()
Range("A12:W12").Select !!!
With Selection.Interior
.ColorIndex = 15
.Pattern = xlSolid
End With
End Sub

--
Tomas Vognar, beginner, Office XP

Sub Za¹edìní_øádku()
With Activecell.Entirerow.Interior
.ColorIndex = 15
.Pattern = xlSolid
End With
End Sub


--
---
HTH

Bob


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



"Tomá¹ Vognar" <vognar(zavinac)esys.cz wrote in message
...
I've recorded a simple macro for Excel, where I work with a row. But I
want
to work with a row the active cell is on, but Macro Recorder has writen me
an absolute referencing. Should anyone help me, how to rewrite the code?

Sub Za¹edìní_øádku()
Range("A12:W12").Select !!!
With Selection.Interior
.ColorIndex = 15
.Pattern = xlSolid
End With
End Sub

--
Tomas Vognar, beginner, Office XP

Thank you very much, it works. But is it possible to rewrite it, so that
limited row was marked? (Since Ay to Wy, or using CurrentRegion)

T.Vognar


"Bob Phillips" pí¹e v diskusním pøíspìvku
...
Sub Za¹edìní_øádku()
With Activecell.Entirerow.Interior
.ColorIndex = 15
.Pattern = xlSolid
End With
End Sub


--
---
HTH

Bob


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



"Tomá¹ Vognar" <vognar(zavinac)esys.cz wrote in message
...
I've recorded a simple macro for Excel, where I work with a row. But I
want
to work with a row the active cell is on, but Macro Recorder has writen
me
an absolute referencing. Should anyone help me, how to rewrite the code?

Sub Za¹edìní_øádku()
Range("A12:W12").Select !!!
With Selection.Interior
.ColorIndex = 15
.Pattern = xlSolid
End With
End Sub

--
Tomas Vognar, beginner, Office XP

I am not understanding. Ay to Wy, what is that referring to?

--
---
HTH

Bob


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



"Tomá¹ Vognar" <vognar(zavinac)esys.cz wrote in message
...
Thank you very much, it works. But is it possible to rewrite it, so that
limited row was marked? (Since Ay to Wy, or using CurrentRegion)

T.Vognar


"Bob Phillips" pí¹e v diskusním pøíspìvku
...
Sub Za¹edìní_øádku()
With Activecell.Entirerow.Interior
.ColorIndex = 15
.Pattern = xlSolid
End With
End Sub


--
---
HTH

Bob


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



"Tomá¹ Vognar" <vognar(zavinac)esys.cz wrote in message
...
I've recorded a simple macro for Excel, where I work with a row. But I
want
to work with a row the active cell is on, but Macro Recorder has writen
me
an absolute referencing. Should anyone help me, how to rewrite the code?

Sub Za¹edìní_øádku()
Range("A12:W12").Select !!!
With Selection.Interior
.ColorIndex = 15
.Pattern = xlSolid
End With
End Sub

--
Tomas Vognar, beginner, Office XP

The best would be region defined by intersection of the CurrentRegion and
active line. I'm sorry, I'm trying this, but I get errors or wrong results.
I do not quite understand the syntax of the VBA, for the meantime.

T.Vognar


"Bob Phillips" pí¹e v diskusním pøíspìvku
...
I am not understanding. Ay to Wy, what is that referring to?

--
---
HTH

Bob


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



"Tomá¹ Vognar" <vognar(zavinac)esys.cz wrote in message
...
Thank you very much, it works. But is it possible to rewrite it, so that
limited row was marked? (Since Ay to Wy, or using CurrentRegion)

T.Vognar


"Bob Phillips" pí¹e v diskusním pøíspìvku
...
Sub Za¹edìní_øádku()
With Activecell.Entirerow.Interior
.ColorIndex = 15
.Pattern = xlSolid
End With
End Sub


--
---
HTH

Bob


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



"Tomá¹ Vognar" <vognar(zavinac)esys.cz wrote in message
...
I've recorded a simple macro for Excel, where I work with a row. But I
want
to work with a row the active cell is on, but Macro Recorder has writen
me
an absolute referencing. Should anyone help me, how to rewrite the
code?

Sub Za¹edìní_øádku()
Range("A12:W12").Select !!!
With Selection.Interior
.ColorIndex = 15
.Pattern = xlSolid
End With
End Sub

--
Tomas Vognar, beginner, Office XP

Sub Za¹edìní_øádku()
With Range("A12:W12").Interior
.ColorIndex = 15
.Pattern = xlSolid
End With
End Sub


--JP

On Mar 14, 4:24*am, Tomáš Vognar <vognar(zavinac)esys.cz wrote:
The best would be region defined by intersection of the CurrentRegion and
active line. I'm sorry, I'm trying this, but I get errors or wrong results..
I do not quite understand the syntax of the VBA, for the meantime.

T.Vognar