Draw a border by a command button

[girapas]

1) I need to make a command button in an Excel XP sheet. When the user clicks the button a border with a specific style will be drawn on the current cell.
2) Next, I want that border to be drawn automatically in another cell (same row, different column).
Thanks in advance

 

[bk]

Can you record this?

 

[Von Pookie]

The code for applying the borders can be recorded, but you would still need to edit the code to do what you want, otherwise.

What is the other cell that should be formatted? Will it always be a certain number of columns to the right/left of the selected cell or will it always be a specific column?

 

[Smitty]

How's this for a start:

<font face=tahoma><SPAN style="color:#00007F">Private</SPAN> <SPAN style="color:#00007F">Sub</SPAN> CommandButton1_Click()
    <SPAN style="color:#00007F">With</SPAN> ActiveCell
        .BorderAround ColorIndex:=3, Weight:=xlThick
        .Offset(, 2).BorderAround ColorIndex:=3, Weight:=xlThick
    <SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">With</SPAN>
<SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN></FONT>

Hope that helps,

Smitty

 

[girapas]

For Von Pookie:
The first cell, where user will draw the border clicking the button, can be anywhere. The other cell is a certain number of columns to the right.