Notifications
Clear all
VBA & Macros
2
Posts
2
Users
0
Reactions
74
Views
Topic starter
Sub math()
Dim num As String
Range("c2:g21").ClearContents
a = Range("a2")
a2 = Range("a3")
Range("c1:g21").NumberFormat = "@"
b = Range("b2")
d = 1
For Count = 1 To b
c = a * a
Range("c" & d + 1).Value = WorksheetFunction.Rept(a, d)
Range("d" & d + 1).Value = "X"
Range("e" & d + 1).Value = WorksheetFunction.Rept(a2, d)
Range("f" & d + 1).Value = "="
num = WorksheetFunction.Product(Range("c" & d + 1).Value, Range("e" & d + 1).Value)
Range("g" & d + 1).Value = num
d = d + 1
Next Count
End Sub
Posted : 23/11/2023 10:18 pm
Hi,
Maybe you understand what you're asking for; to mee it's entirely unclear
Furthermore I advice you to also mention the Excel/Office bersion you're using in view of new functionality
Posted : 25/11/2023 2:49 am
