Kare 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 getSquareRoot()
Dim rng As Range
Dim i As Integer
For Each rng In Selection
If WorksheetFunction.IsNumber(rng) Then
rng.Value = Sqr(rng)
Else
End If
Next rng
End SubAçıklama
Kodlar seçtiğiniz alanda sayı var yok kontrolü yapar ve varsa sayıları karekökleri ile değiştirecek şekilde işlem döndürür.Faydalanılması temennisiyle