VBA Help, Find, Copy & Paste

[KitK369]

I'm very new to VBA and figuring it out through YouTube videos and online google searches. I'm having some problems finding out how to do an If Then statement in VBA.

I have the same text that can be found in either cell A47 or B47. The text is "Other." I want to do an If statement that says if the text "Other" is found in Cell B47 to copy and paste it into cell A47. However, if the text doesn't appear in cell B47 I don't want it to do anything because it already exists in cell A47. I will also need for it to repeat throughout my workbook for each tab within. These tabs all have different names so I can't reference "Sheet1, Sheet2, etc." I would also prefer not to use any msg boxes or activate buttons.

Anyone know how to accomplish this?

Your help will be greatly appreciated!

 

[Joe4]

Try this:

Sub MyCopy()

    Dim ws As Worksheet
    
    For Each ws In Worksheets
        If ws.Range("B47") = "Other" Then ws.Range("A47") = ws.Range("B47")
    Next ws
            
End Sub

 

[KitK369]

This worked! And was way less complicated than anything I was finding online. Thank you so much for the help!

 

[Joe4]

You are welcome.
Glad I was able to help!