LQQKANDC adlı üyeden alıntı: mesajı görüntüle
Excell Makro, Satır ve sutun başlangıç bitişlerini sen ayarla, 1 to 83 yazan yerleri
Sub yaz ()
For i=1 to 83
  For t=1 to 83
      if Cint(Trim(Cells(i,t))) > 250 Then
           Cells(i,t) =1
      Else
          Cells(i,t) )=0
     End If    
  Nex t
Next i
End Sub
CHATGPT adlı üyeden alıntı:
  1. Excel dosyanızı açın.
  2. "Geliştirici" sekmesini göremiyorsanız, Excel'e "Geliştirici" sekmesini eklemelisiniz. "Dosya" > "Seçenekler" > "Özelleştirme Sekmesi" > "Ana Sekme Seçimi" > "Geliştirici" seçeneğini etkinleştirin.
  3. "Geliştirici" sekmesini tıklayın ve "Visual Basic" düğmesini seçin.
  4. "Visual Basic for Applications" penceresi açılacaktır. Sol tarafta "VBAProject (YourWorkbookName)" altında "Modüller" adlı bir klasör göreceksiniz. Bu klasörü çift tıklayarak açın.
  5. Yeni bir modül eklemek için "Modüller" klasörüne sağ tıklayın ve "Ekle" > "Modül" seçeneğini seçin.
  6. Modül penceresinde verilen VBA kodunu yapıştırın.
  7. Kod penceresini kapatın ve Excel dosyanıza geri dönün.
  8. "Geliştirici" sekmesinde "Makro" düğmesini tıklayın.
  9. "DegerKarsilastir" adlı makroyu seçin ve "Çalıştır" düğmesini tıklayın.
Bu makro, belirtilen hücre aralığı içindeki değerleri karşılaştırarak 250'den büyük olanları 0, küçük veya eşit olanları 1 olarak güncelleyecektir.
Ek olarak => Makro nasıl çalıştırılır?