Hi
I have range B4:J...->...last row in tab "Data"
if in column C has "Switches" copy from tab "Data" range("C5:J...Last Row") to tab "Report" range("E4")
if in column C has "Racks" copy from tab "Data" range("C5:J...Last Row") to tab "Report" range("E11")
if in column C has "Outros" copy from tab "Data" range("C5:J...Last Row") to tab "Report" range("E20")
Thank you!!!
Last edited by marreco; 01-21-2015 at 06:38 AM. Reason: wrong write
"No xadrez nem sempre a menor dist?ncia entre dois pontos ? uma linha reta" G. Kasparov.
If your problem is solved, please say so clearly, and mark your thread as Solved: Click the Edit button on your first post in the thread, Click Go Advanced, select b from the Prefix dropdown, then click Save Changes. If more than two days have elapsed, the Edit button will not appear -- ask a moderator to mark it.
Try this...
Please Login or Register to view this content.
If your problem is solved, then please mark the thread as SOLVED>>Above your first post>>Thread Tools>>
Mark your thread as Solved
If the suggestion helps you, then Click *below to Add Reputation
Hi
Thak you, but display error
this line yellowRun-time error '94'
Use of 'Null' invalid
Please Login or Register to view this content.
Hi
Thak you, but display error
this line yellowRun-time error '94'
Use of 'Null' invalid
Please Login or Register to view this content.
Oopss... Convert the conditions to uppercase
"Switches", "Racks", "Outros"
to
"SWITCHES", "RACKS", "OUTROS"
Can you test this
Please Login or Register to view this content.
Try this revised one
Please Login or Register to view this content.
I still make something wrong becouse error continue display.
Maybe you can look my file in #1
In your attachment... Column B has the values of Swiches, Racks..... not in Column C..
I was written that code without seeing your fileOriginally Posted by marreco
My Post #7 code is working fine by changing "C" to "B"
Yes, i need comparing B column, but copy C:J column
Given codes should the same....
hi
after run your code, coping to uniq destination.
in my file i hve small tables inside tab "Report"
Tested and working fine at our end
Look image and you understand my intention.
Thank you!!
Your intention was very clear to us and we given our solution based on your requirement
I have adjusted the code you have on the module.
Hi AB33, thank you, perfect solution!!!
Thank you very much!!!!!!!!
Hi AB33, way in my adaptation, your code run but nothing happening?
code is inside module sheet3 (portuguese is Plan3 ("Painel") )
Thank you!!
Amended code:
You have a great knowledge.
Not to open new thread I will ask on this one:
I am trying to copy value from two specific cells to specific cells in another sheet.
Problem is that I have many cells in first sheet and some of them are empty. Also paste is always 99 times, just range changes. Is there a loop to make everything more easy?
Here is my attempt
Sub copytry()
Worksheets("sheetI").Range("I17:J17").Copy _
Destination:=Worksheets("sheetII").Range("F1352:F1451")
Worksheets("sheetI").Range("I18:J18").Copy _
Destination:=Worksheets("sheetII").Range("F1452:F151")
End Sub
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks