Connecting two VBA codes (Private Sub Worksheet_Change(ByVal Target As Range)

**TinRu** · 08-26-2014, 06:21 AM

Hi everyone,

this is my first post so sorry in advance if I am doing anything wrong.

I am total "tabula rasa" when it comes to VBA. PLs help me to combine some code which would do the following:

I have one Oval shape which changes color due to value in cell A1.

It would be great if I could multiply this shape and connect it with cells A2, A3, A4 and so on.

Point is to get shapes which change they color when values in A cells changes between "MC", "HE", "CA" and "OTH" (in original workbook they are result of vlookup formula).

Example is attached.

Thanks a million,

Tin

**Izandol** · 08-26-2014, 06:47 AM

If cells contain formulas they will not raise Change event when they are updated. You must rather use Calculate event which will be raised whenever worksheet is calculated for any reason. If you do use naming convention so shapes are named with cell address - 'OvalA1', OvalA2 et cetera - you may use:

Please Login or Register  to view this content.

Connecting two VBA codes (Private Sub Worksheet_Change(ByVal Target As Range)

LinkBack

Thread Tools

Rate This Thread

Display

Connecting two VBA codes (Private Sub Worksheet_Change(ByVal Target As Range)

Re: Connecting two VBA codes (Private Sub Worksheet_Change(ByVal Target As Range)

Thread Information

Users Browsing this Thread

Similar Threads

Private Sub Worksheet_Change(ByVal Target As Range)

[SOLVED] Private Sub Worksheet_Change(ByVal Target As Range) End Sub

Private Sub Worksheet_Change(ByVal Target As Range) Help

Private Sub Worksheet_Change(ByVal Target As Range)

Private Sub Worksheet_Change(ByVal Target As Range)

Bookmarks

Bookmarks

Posting Permissions