Good morning,
* In the attached file by clicking on the "compare columns" button
It compares the same values between two columns chosen by me and colors them in yellow.
So far all right, now I would like to be able to filter by color and copy the results to another sheet.
What I want to get is seen in sheet1
Thank you
Please Login or Register to view this content.
Alan עַם יִשְׂרָאֵל חַי
Change an Ugly Report with Power Query
Database Normalization
Complete Guide to Power Query
Man's Mind Stretched to New Dimensions Never Returns to Its Original Form
Hi Alansidman
Meanwhile I thank you for the code you sent me.
If the color was always in column J works correctly but, the color of the columns can vary from H to N (in the attached sample file).
As mentioned above, clicking on the "compare columns" button I choose 2 columns to compare the same values and, it is not always the column J but it can range from H to N.
I hope I'm better explained
Thanks again.
In that case, change the range that c searches. ie.
Please Login or Register to view this content.
Sorry, a little mistake yet.
She copies me the rows 2 times.
I selected column 8 and column 9
Should only copy line 25
But as you can see in sheet1, it shows it twice.
So also with other columns.
Yup. You are right. It happens because c finds the interior color index twice. Once in column H and again in Column I. Need to relook at how it searches as we have given it a range of H:N columns. A question, would it be acceptable to ask via an input box which column to search? Would that work for you?
If you can not do it anyway, do the same with the imput box.
But, can not you say that if a row from column H to column N finds a colored cell then copy line?
That is what is happening now, but it copies twice because it finds two cells colored on a line.
Try this as I think this will deliver what you want.
Please Login or Register to view this content.
Perfect Alan, now works thanks
If for you is not a problem, how can I change the next macro that instead of asking No. column asks for column letter?
Please Login or Register to view this content.
Please Login or Register to view this content.Instead of the Cells Object which uses the syntax Cell(rownumber, column number)Please Login or Register to view this content.
Use the Range Object which uses syntax Range(FirstCell:SecondCell) syntax.
Or use the cells object with syntax cell(rownumber, column letter surrounded by quotes)
Sorry Alan,
Making the corrections you've made me mistaken
On the line:
Set pippo = zona.Cells (1, Val (Campo))
Please Login or Register to view this content.
Last edited by Berna11; 06-25-2017 at 05:35 PM.
change toas Campo is now a stringPlease Login or Register to view this content.
make similar changes to code further along.
Hi Alan,
I still ask you to apologize but, I'm not very experienced and translation does not help me.
I inserted the variation:
Then I took off the rows below:Please Login or Register to view this content.
in:Please Login or Register to view this content.
But continues to make mistakes in:Please Login or Register to view this content.
Thanks again for the interestPlease Login or Register to view this content.
I've gone back and analyzed your original code and because you are subtracting column numbers from other column numbers, you probably need to keep the code as originally shown. You cannot subtract column letters from other column letters. You will be better served to stay with the original code using column numbers. I apologize for now seeing this sooner as I was responding to general questions and did not really look at the entire code. Your original code works. Stay with it as it is not broken.
Alan
Well Alan
thank you very much for your interest.
I'll have my original coice.
Thanks again for your precious help
A greeting to the next.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks