Değerleri Değiştirmek

Bu örnek, Excel VBA’da iki değeri nasıl değiştireceğinizi öğretir. İleride göreceğimiz gibi daha karmaşık programlarda bu yapıya sıklıkla ihtiyaç duyacaksınız.

Çalışma sayfanıza bir komut düğmesi yerleştirin ve aşağıdaki kod satırlarını ekleyin:

  1. İlk olarak, Double türünde x adında bir değişken tanımlıyoruz.
Dim x As DoubleCode language: VB.NET (vbnet)
  1. Değişken x’i A1 hücresinin değeri ile başlatıyoruz.
x = Range("A1").ValueCode language: VB.NET (vbnet)
  1. Artık B1 hücresinin değerini A1 hücresine güvenli bir şekilde yazabiliriz (A1 hücresinin değerini x olarak sakladık, böylece kaybetmeyeceğiz).
Range("A1").Value = Range("B1").ValueCode language: VB.NET (vbnet)
  1. Son olarak, A1 hücresinin değerini (x’e yazılan) B1 hücresine yazarız.
Range("B1").Value = xCode language: VB.NET (vbnet)

Sonuç:

Değerleri Değiştirmek
Değerleri Değiştirmek

Tüm Kodlar:

Option Explicit

Private Sub CommandButton1_Click()

Dim x As Double
x = Range("A1").Value

Range("A1").Value = Range("B1").Value
Range("B1").Value = x

End SubCode language: VB.NET (vbnet)

Yayımlandı

kategorisi

yazarı:

Admin

Etiketler: