Good Evening Members
I am Building a user form to store my contacts.By using the user form I can edit,search,view previous or next contact or add new contact
There is a command button "Add" which on clicking updates sheet with any modification made on user form.This Button works beautifully when...
Thanks for prompt reply Nebu
code is successfully copying from one visible to another visible range
but destination sheet1 is showing data in reverse order
ie if ID in Sheet 2 column A is 1,2,3,4 ..... then copied range is .....4,3,2,1
can you correct this
Also I want to restrict copy Paste...
I have a database in sheet 2 which has certain rows hidden.I want to copy this data to sheet 1 which also has certain rows hidden but hidden rows are different on both sheets.
I have this macro which copies visible data from sheet2 to sheet 1 then sheet1 printout is taken but since hidden rows...
I think there is no straight ans to this issue.I have found a way by loading a column in another sheet with listbox items and then copying that range to visible cells of Sheets("Detail").Range K18:K54
This thread is closed
I have this workbook where Sheet ("OPD") has the Database
Sheets("Detail") displays Data based on VLookup formula using K9 value
It has userform Bloodfrm having Listbox1 which should update Sheets("Detail").Range K18:K54 with selected values.Sheets Detail has some blank rows which are hidden...
its Fantastic .Working Flawlessly :):):):):)
I just want slight modification in following lines
'error checking
If visRng Is Nothing Then
MsgBox "No cells visible."
Exit Sub
Instead of checking if visRange is blank
It should check if it is nonempty
if nonempty then...
Luke Its Working Great:):)
Thanks
Now second part of the Question which I had Posted while starting this thread
How to recall or update Sheets("Detail").Range K18:K54 visible cells from Sheet OPD Row where corresponding data matching K9 is stored
ie Exactly Reverse of above code
Example...
Sorry for incomplete information
Sheet ("OPD") has the Database
Sheets("Detail") displays Data based on VLookup formula
Userform has list box which updates Sheets("Copy") Column C
Sheets("Detail").Range K18:K54 Visible cells are updated from Sheets("Copy") Column C
Pl Ignore Sheet 3 Its used...
I have a Prescription Sheet containing Reports List in Range K18:K54.With Every new prescription all blank rows in used range are hidden using VBA.
Report List is added to visible cell in Range K18:K54 using a List Box
Now I want to macro code to update Active Row in Sheet OPD with visible cell...
well you are right.Problem is with date format in visitdate and updated cell in first column. Both are fomatted to "dd/mm/yyyy hh:mm AM/PM" but cell value displays as mm/dd/yy format hence the mismatch
when date is in double digit ie 10 to 31 it is displayed as "dd/mm/yyyy hh:mm AM/PM"
But when...