Küp Kökünü Hesaplama isimli içerikte, ilgili işlemin VBA kodları ile nasıl yapacağınızı öğreten bir Hazır Makro Kodu yer almaktadır.
Faydalanılması temennisiyle
Hazır Kod
VBA:
Sub getCubeRoot()
Dim rng As Range
Dim i As Integer
For Each rng In Selection
If WorksheetFunction.IsNumber(rng) Then
rng.Value = rng ^ (1 / 3)
Else
End If
Next rng
End Sub
Açıklama
Kodlar seçtiğiniz alanda sayı var yok kontrolü yapar ve varsa sayıları küpkökleri ile değiştirecek şekilde işlem döndürür.Faydalanılması temennisiyle