Is this possible?
Hi All,
I have written a routine that matches 2 staff lists that may contain up to
5000 staff and the exercise needs to be repeated approx 140 times so you can
see the neccesity of automating the process. However there are the
inevitable unmatched entry's which need manual intervention. The matching
cannot be done on surname only as there are many duplicates.
1) This is an example of the unmatched entries before manual intervention
A B C D E F
G H I J
1 SMITHWILL SMITH WILL xyz abc
2
SMITHWILLIAM SMITH WILLIAM xyz abc
2) This is how it needs to look after manual intervention
A B C D E F
G H I J
1 SMITHWILL SMITH WILL xyz abc SMITHWILL SMITH
WILLIAM xyz abc
This was achieved by clicking on SMITHWILLIAM and using a keyboard shortcut
to run the following code (there are many more columns associated to
smithwilliam in the actual template) then dragging the whole selection up 1
row.
3) Range(ActiveCell, ActiveCell.Offset(0, 12)).Select
Secondly, and essentially, so that columns A & F are an exact match, the
following code is run by kb shortcut
4) ActiveCell.Formula = "=UPPER(A" & ActiveCell.Row & ")"
The problem with that is the user is very likely to forget to run the 2nd
bit of code.
So what l am trying to achieve is this:
1) The user selects SMITHWILLIAM and runs code to select all associated
columns, as per code in 3)
2) The user drags the selected range to the appropriate row
3) Code is automatically run to copy contents of column A to column F, as
per code in 4)
It seems to me that using the worksheet_change event is not appropriate
because of the number cells being changed by the various other routines that
copy, paste, move, match etc.
Hope l have explained the problem clearly.
All suggestions / possible solutions gratefully recieved
Regards
Michael Beckinsale
|