vresult

I need to know how and where to insert an IF statement to this part of my VBA to check if cell b5 is blank. If it's blank it should be cell c5. How would I do that? Dim lLastrow As Long Dim vResult As Variant With ActiveSheet lLastCol = .Cells(5...

I have items in Col D which is colored in yellow using a fill color I use a UDF to sum these items. However, when I add color additional values using the fill color the values are not updated. I have to edit the function and enter and then enter in order for it to update I have added code...

Hi all I am new to VBA/Excel so I apologise in advance for my ignorance I am trying to insert code that will count number of cells with a fill colour, I found the code below which works once but if you alter the number of cells with fill colour it does not automatically update the count...

Hello I was wondering if anyone could help I got the below from a post on here quite a while ago which is brilliant it has helped with our spreadsheet but we are having a couple ofissues which I wondered if anyone could possibly help me resolve. 1. We have quite a large amount of data we...

Hi peeps - Happy New Year! I was wondering - I need to do a lookup / or Match for cells that are coloured in red. I have been advised the below is best - but I'm worried that it will only count the "numbers" in the cell which is coloured in. What I actually want is to return a sum based on...

I found this code online but didn't quite work out after a few modifications. What I'm trying to do is compare two ranges. First range contains text in the cells and the second range contains cells with background/filled color. What I'm trying to do is only count the number of cells that do...

Hi guys im trying to set my entire worksheet into an array , loop trough the rows/columns and set this data into 2nd array vResult if the date is not over. then the plan is to delete the cells with the first arr and insert the 2nd Here is what I got, but Im having some problem with the...

Hi guys Ive used all the stuff ive learned over the last 6 months to create this code which basically search for duplicates. Sub DuplicateSearch() Dim lr, i, j, k, m As Long Dim str As String, str2 As String Dim vData, vResult As Variant Dim vSearch, vOdd, vOdd2 As Variant Dim sheet As...

Hi guys I was lucky enough a few days ago to get help from Marcelo Branco he helped me find max value at lightning speed with this code: Sub aTest() Dim lastRow As Long, vData As Variant, vResult As Variant Dim i As Long With Sheets("Sheet1") lastRow =...