Tarih Değeri Yazarken Otomatik Ayraç Kullanımı isimli kod, bir tarih değerini yazarken gün ve ay bilgisinden sonraki ayracı otomatik olarak kendisi ekler.
Excel formülleri ile sayının asal olup olmadığını öğrenmek istiyorsanız, Excel Asal Sayı Hesaplama dosyamızı indirebilirsiniz.
Faydalanmanız temennisiyle.
Kod:
Function Asalmi(xSayi As Double) As Boolean
asalmi = False
If (xSayi < 2) Or ((xSayi Mod 2 = 0) And (xSayi > 3)) Then Exit Function
If (xSayi = 2) Or (xSayi = 3) Then
asalmi = True
Exit Function
End If
Dim i As Long
For i = 3 To Int(Sqr(xSayi)) + 1 Step 2
If xSayi Mod i = 0 Then Exit Function
Next i
Asalmi = True
End Function
Uygulama Adımları
- Microsoft Visual Basic for Applications penceresini (Alt + F11) açın.
- Project - VBAProject alanının, ekranın sol tarafında görüldüğünden emin olun. Görünmüyorsa, Ctrl + R kısayolu ile hızlıca açın.
- Araç çubuklarından Insert -> Module yazısına tıklayın.
- Solunda klasör simgesi olan Modules yazısının başındaki + simgesine tıklayın.
- Alt kısma eklenecek gelecek olan Module(1) yazısına çift tıklayın.
- Üstteki kodu yapıştırın.
Kod Açıklaması
Bir hücrede yazılı olan bir sayının asal sayı olup olmadığını üstteki kod ile öğrenebilirsiniz. Yapmanız gereken, boş bir hücreye=Asalmi(A1)
şeklinde formülü yazmak. A1 olan kısım, sizin sayınızın olduğu hücrenin adresi olarak değişecektir.Excel formülleri ile sayının asal olup olmadığını öğrenmek istiyorsanız, Excel Asal Sayı Hesaplama dosyamızı indirebilirsiniz.
Faydalanmanız temennisiyle.