Im filtering a selection and I want to insert a msg box to allow the user to work on the spreadsheet once the msg box pops up. Therefore they can make changes then click ok to let the macro continue. How would i do that? Right now its not allowing me to edit. Thanks.
Dim lRow5 As Long...
Here is what I am using...
With Range("H2:H5000")
.FormulaR1C1 = "=SUMPRODUCT(('Data Sheet'!R2C11:R5000C11=RC1)*('Data Sheet'!R2C81:R5000C81=""G - Prior policy incident handling errors""))"
.Copy
.PasteSpecial Paste:=xlPasteValues
End With
Ok, here is where it gets tricky...
Sorry to start another post but I was new and I marked my last post complete before it actually was. Below is the code I am using. It works great, but I also need to add to it. In addition to what is below I need this to count the corresponding cells in col BW sheet "data sheet" that contain a...
Here is code i have previously used.
For Each ce In Range("a2:a" & Cells(Rows.Count, 1).End(xlUp).Row)
ce.Offset(0, 1) = WorksheetFunction.CountIf(Range("k2:k"), ce.Value)
Next ce
However, now my data is on a seperate spreadsheet. Column A i want to use is on sheet "sales rep" and...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.