I have the following:
Range("Q1").Select
   Selection.NumberFormat = "dd/mm/yyyy"
later I have this:

Morning all, and happy Wednesday.
Have a slightly bizarre one to ask you fine people about.
The following Workbooks.Open statement forms part of my code.
Workbooks.Open Filename:=TargetPath & TargetBook, Password:="xxx",

The following code worked fine with Excel 2000:
Dim myWord As Word.Application
Dim Dokument As Word.Document
Set meinWord = GetObject(, "Word.Application")

I got this code from a site on-line.
I need to scan a list of cells in a worksheet and search for any cells
that are colored red.
If any of the cells are colored red I need to display it in a separate

I am having lots of difficulties with tonnes of data on back of my
head.
Basically, I have about 120 outlook emails saved on my drive. Each
email file obviously have different names.

Hi, I monitor the energy usage for my organisation and report quarterly. As
you will be aware, utility bills do not always come in nice and neat
quarterly or monthly invoicing periods and I would really benefit from a way
of automatically splitting amounts entered into quarters. ...

I have the following code wich hides  lines in an income statement if active
cell is equal to  "Hide". "Hide" is displayed when a divisional total =0.
Each division is shown on a separate page.
Sub Hide_Blanks()

Below is some code I've written which populates a scatter graph with data
extracted from a different work sheet.  What I can't work out is changing
the data label names.  The script loops through each plot value (case) and
for each iteration I would have liked to change the data ...

The cells in COL A look like this:
140370005
140370006
140373002

I was wondering if anyone can help with my problem.
I have a workbook containing three worksheets; 'sheet1', 'sheet2' and
'sheet3'. And;
1. On 'sheet1' I have name of the months from B5 to AO5

Using Excel 2003 VBA I'm looking to Populate a 1 dimensional Array
with a Discontiguous values.
For example, instead of fully declaring a range like this
Array(1,2,3,7,8,9) I want ot pupulate the array by declaring the range

After  creating a workbook, when opened from the GUI, I am noticimg that the
window
is not properly arranged. In particular, I cannot see the tabs at the
bottom.

Is there any excel function for subtotal to ignore cell error while
adding up the values in a column ?
E.g.
      A

I am looking for a fast and efficient method to verify if a text
string exists in a file.  Has anyone created anything like this?
The files are typically under 100K but I will be doing thousands of
checks.

Can someone please help me? I keep getting the following error message
whenever I try to run a macro I created:
Run-time error '1004':
Unable to set the InvertIfNegative Property of the Series Class