I currently have static sized shapes, vba as follows:
If Not WorksheetFunction.IsNumber(ActiveWorkbook.Sheets("Configuration").Range("B25").Value) Then
CheckConfigItems = CheckConfigItems & "The Shape Size Value is Missing from the Configuration Sheet (Cell B25)" & vbCr & vbLf
Else
gShapeSize = ActiveWorkbook.Sheets("Configuration").Range("B25")
End If
How can I size the shapes based on a range of text in excel please?
Thank you
Jacq
If Not WorksheetFunction.IsNumber(ActiveWorkbook.Sheets("Configuration").Range("B25").Value) Then
CheckConfigItems = CheckConfigItems & "The Shape Size Value is Missing from the Configuration Sheet (Cell B25)" & vbCr & vbLf
Else
gShapeSize = ActiveWorkbook.Sheets("Configuration").Range("B25")
End If
How can I size the shapes based on a range of text in excel please?

Thank you
Jacq