Last seen: May 22, 2025
Is this the kind of thing you had in mind? It's just a pivot chart with the dates grouped by year and day, then the value field set to show as a ru...
There is a Thanks button at the top right of each post (other than your own!):
I would also recommend using a variable so you only need to alter it in one place: Private Sub CommandButton1_Click() Dim RT_Line_Code As S...
Judging by the picture, your worksheet is called "CODE v2" - note the space in the middle.
Just as an alternative, you could also do it as a UDF: Function AddSKU(CellText As String, SKU_text As String) As String Const DELIMITER As String ...
The copy line should only copy unfiltered rows anyway, but if you need to specify it, use: wsCopy.Range("A2:D" & lCopyLastRow).Specialcell...
Assuming you assigned it to the form button correctly, put a breakpoint at the start of the code then click the button and step through the code check...
I would advise against using activex controls unless they have a particular functionality you need, but to address your question specifically: optionb...
It would be a lot easier to comment on code that we can see, but the most likely cause would be that, since you're using a commandbutton and not a For...
RangeMortality.Item(1, 1).Value and RangeMortality(1, 1).Value are the same, as indeed are RangeMortality.Cells.Item(1, 1).Value and RangeMortal...
The formula goes in a cell, not in the shape.
The function code must be in a normal module, not a worksheet or ThisWorkbook module.
You could also do this with a UDF: Function ColourShape(theValue As Double, ShapeName As String) With Application.Caller.Worksheet.Shapes(Shap...
You should remove the bold line completely. The path is supplied when you call that routine - the routine should not change it.
What happens if you get to ZA99?