VBA MAcro to clear contents of specific cells if a specific cell contains text

**muzzareilly** · 03-28-2017, 07:22 AM

I am trying to use a macro to do the following
If cell D279 contains any text then Clear contents of cells D276 & D277 - All cells are using data validation lists if an item is selected in Cell D279 than the items in D276 & D277 are no longer required.
I have tried the following code with Any & specific Text but it dosent seem to work

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("D279")) Is Nothing Then
If UCase(Range("D279")) = "Upgrade - To Ilve CJK90CSVI 90cm Dual fuel Upright Cooker" Then
Application.EnableEvents = False
Range("D276").ClearContents
Range("D277").ClearContents
Application.EnableEvents = True
End If
End If
End Sub

Appreciate any help
cheers

**Arkadi** · 03-28-2017, 07:30 AM

Hi muzzareilly:

First of all please review the forum rules, not only, but especially #3 about using code tags.

That said, in this line:

Please Login or Register  to view this content.

UCase is a function that converts D279 to caps, so the If statement will NEVER return true, thus the code does nothing.

Change it to:

Please Login or Register  to view this content.

and see if it starts to work. Or if ANY text in D279 should trigger it then:

Please Login or Register  to view this content.

**muzzareilly** · 03-28-2017, 08:33 AM

Thanks Arkadi that seems to have worked
Sorry about the code tags my first post.
cheers

**Arkadi** · 03-28-2017, 12:47 PM

Glad I could help out, no worries about code tags, you are new and have to learn so I was just pointing it out

If the issue is resolved, please remember to mark the thread as solved (at the top right, under Thread Tools, you can select to mark as solved).

VBA MAcro to clear contents of specific cells if a specific cell contains text

LinkBack

Thread Tools

Rate This Thread

Display

VBA MAcro to clear contents of specific cells if a specific cell contains text

Re: VBA MAcro to clear contents of specific cells if a specific cell contains text

Re: VBA MAcro to clear contents of specific cells if a specific cell contains text

Re: VBA MAcro to clear contents of specific cells if a specific cell contains text

Thread Information

Users Browsing this Thread

Similar Threads

[SOLVED] Clear cells that do not contain specific text which may be at the beginning or end of cell

[SOLVED] code to clear all contents in columns with specific text in row 2

[SOLVED] Clear contents in specific cell and the cells in the next 2 columns to the right

[SOLVED] Clear contents of specific cells on the same row if a specific cell on that row is empty

[SOLVED] VBA Macro To Clear Cell When Specific Text Is Entered

Macro to clear only the contents of the cells which have a specific font colour

Clear contents of cells that do not contain specific text, sort cells that do

Bookmarks

Bookmarks

Posting Permissions