I have been given code that seems repetative, was trying to figure out a way
to shorten it up and make more efficient. is there a way to refer to the
borders with one command.          I was thinking of doing with within with
statements as follows

I have this code :-
Private Sub CommandButton1_Click()
Dim FW As Variant
Dim rngCell As Range

I have a vbscript that appends data to a csv file on a daily basis. When new
data gets appended to the bottom rows of the file, I'd like the oldest data
in the top rows to be deleted. Does anyone know how I can delete the top 3
rows every time the file gets appended? Here's what ...

I have the following code, I know there has to be some way to improve on it.  
I would greatly appreciate it if someone would give me some guidance on it.
Thanks in advance and here is what code I have.
Sub test()

We have multiple workbooks on a network (one per user). When each is opened,
a second (source) XLS file on the same network drive is opened, and a few
values are compared to see if the information in the source file is newer
than in the individual file. If so, the newer information ...

I am having trouble coming up with code to move to the next sheet.  The
problem is the code I have is based on the Sheet#  (Sheet1, Sheet2,
etc).  The user may re-name these sheets and move them around the
workbook.

I want to replace a current module in a workbook with a updated module
of th same name. More or less like a patch. Can this be done using
code. I've looked through the threads and do not see anything that
directly relates to using code to replace the module.

I have a workbook containing two sheets.
On sheet1 named 'Entry', all the details of overtime are entered.
When the details of that days overtime are entered, the macro is run which
transfers the info into row3 of sheet2, which is named 'Form'

I have two workbooks.  One is produced from a routine run - Workbook1.xls.  
The other is a static file with a lookup table in - Lookup1.xls.  I want to
take a cell value from Workbook1.xls, find that value in column 1 of
Lookup1.xls, and return a corresponding value from column 3 ...

I have written the following code to open a file:
Workbooks.Open Filename:=CurDir & "\FILENAME.XLS"
This was created in a folder on my hard drive, but now that I have moved
everything to a network drive I get errors saying that the file does not

My code opens a new workbook. Instead I need the data to be imported into an
existing worksheet name GLFBCALO. Is there a way I can do this?
Public Sub ImportOKdata()
   Dim MyFile As String

I have been able to go from this:
   Columns("F:F").Select
   Selection.Cut
   Columns("A:A").Select

I am trying to loop through rows and paste data on each row.  I keep getting
an error code on this (even though it should be VERY simple)!
j=1
Sheets("Array 1").Range("A75:ES75").Copy

I'm drawing a blank here....
I open a workbook containing macros
I enable macros
A macro called IntroMessage runs (displays a msgbox)

Hi;
I have a textbox on a Userform for phone numbers.  I want to have the most
likely area code placed in the textbox.  I don't want to use a listbox.  I
have: