VBA to search for value and if it exists copy text from 4 cells into new cells

**smudgers9** · 02-13-2019, 10:27 AM

Hi,

Please see the attached example.
On Sheet 2 is a form created to amend data on sheet 1. The bottom right box on the form titled "Copy All Original Coding" needs to search column A on Sheet 1 when a number is entered into the box and the button pressed. I know the number will exist in column A because I will have already verified this, so when the button is pressed I need it to copy the data from cells H,I,J,K on that row to cells L,M,N,O on the same row.
Screen shot.PNG Screen Shot 2.PNG

Hope you can help me out.

**alansidman** · 02-13-2019, 10:32 AM

Access to VBA is locked down with a password. Cannot provide any help without being able to access VBA.

**smudgers9** · 02-13-2019, 10:39 AM

Apologies @alansidman you're right. I have now removed the password protection.

**alansidman** · 02-13-2019, 11:31 AM

Unable to scroll to bottom of the form. Appears to be locked in place and will not allow me to see the entire form. Form does not appear to have been created in VBE. Cannot see a way to edit form.

**smudgers9** · 02-13-2019, 11:50 AM

@alansidman - I have frozen the panes as this will only be viewed on wide screen monitors which is why you can't scroll. The boxes are ActiveX control text boxes and the buttons are just shapes with macros assigned to them. This way I can design something that looks less "Excel" and more visually appealing. The module (8) has been created but I haven't created any code for it yet as I didn't even know where to start.

**Fluff13** · 02-13-2019, 12:01 PM

How about

Please Login or Register  to view this content.

**smudgers9** · 02-13-2019, 12:09 PM

Thanks Fluff13, this gives me an error - Run-Time error '6':
Overflow

**Fluff13** · 02-13-2019, 12:25 PM

What line was highlighted when you got the error & was that on the workbook you supplied?

**smudgers9** · 02-13-2019, 12:30 PM

Please Login or Register  to view this content.

**Fluff13** · 02-13-2019, 12:36 PM

And the answer to the other part of my question?

**smudgers9** · 02-13-2019, 12:40 PM

I added that exact code to module8 on the workbook I supplied you yes.

**Fluff13** · 02-13-2019, 12:45 PM

It worked for me.
What number did you enter into the search box?

**smudgers9** · 02-13-2019, 12:47 PM

Still doesn't work for me. I copy and paste (but have manually typed too) any of the numbers from column A.

**Fluff13** · 02-13-2019, 12:55 PM

Oops missed that bit, as you were copying the costings I thought you were looking for the Cost Center number
Try

Please Login or Register  to view this content.

**smudgers9** · 02-13-2019, 12:59 PM

Ah I see what you've done. If I enter any of the values in column H then it works. How do we do this for column A?

**smudgers9** · 02-13-2019, 01:02 PM

Amazing that works a treat. Thank you so much.

**Fluff13** · 02-13-2019, 01:03 PM

You're welcome & thanks for the feedback

VBA to search for value and if it exists copy text from 4 cells into new cells

LinkBack

Thread Tools

Rate This Thread

Display

VBA to search for value and if it exists copy text from 4 cells into new cells

Re: VBA to search for value and if it exists copy text from 4 cells into new cells

Re: VBA to search for value and if it exists copy text from 4 cells into new cells

Re: VBA to search for value and if it exists copy text from 4 cells into new cells

Re: VBA to search for value and if it exists copy text from 4 cells into new cells

Re: VBA to search for value and if it exists copy text from 4 cells into new cells

Re: VBA to search for value and if it exists copy text from 4 cells into new cells

Re: VBA to search for value and if it exists copy text from 4 cells into new cells

Re: VBA to search for value and if it exists copy text from 4 cells into new cells

Re: VBA to search for value and if it exists copy text from 4 cells into new cells

Re: VBA to search for value and if it exists copy text from 4 cells into new cells

Re: VBA to search for value and if it exists copy text from 4 cells into new cells

Re: VBA to search for value and if it exists copy text from 4 cells into new cells

Re: VBA to search for value and if it exists copy text from 4 cells into new cells

Re: VBA to search for value and if it exists copy text from 4 cells into new cells

Re: VBA to search for value and if it exists copy text from 4 cells into new cells

Re: VBA to search for value and if it exists copy text from 4 cells into new cells

Thread Information

Users Browsing this Thread

Similar Threads

Search for specific text then copy text into cells below

Search through multiple worksheets and copy cells to another if a specific text matches

Search cells for a string and when that string exists copy entire cell to another cell

[SOLVED] Can someone help with a small macro? Search for Text and copy Text from cells

Combine multiple text cells if value exists in other cells

Search header row for common text in cells and copy below rows to new sheet

VBA: Search for text in database in copy cells within target rows

Tags for this Thread

Bookmarks

Bookmarks

Posting Permissions