Aralıkta Döngü ile Arama

Bu konumuzda aralıkta yanı sutun ve satırlarda dongu ıle nasıl arama yapabılecegınıze ve adresini ogrenebiliceginize dair ufak bir ornek isleyecegiz, sadece isinma turlari diyebilirim; sadece ogrenip gecmeniz gerekn bir konu..

Oncelikle sutunlarda bir arama yapalim, A sutununda bir veriyi arayip adresini isteyelim..

VBA Kodlari

Public Sub Sutunda_Dongu()
Dim i As Range
For Each i In Range(“A:A”)
If i.Value = “Exceltr” Then
MsgBox “ExcelTR terimi ” & i.Address & ” adresinde Bulundu.”
End If
Next i
End Sub

Bu seferde satirda bir dongu olusturalim;

Public Sub Satirda_Dongu()
Dim i As Range
For Each i In Range(“1:1”)
If i.Value = “ExcelTR” Then
MsgBox “ExcelTR terimi ” & i.Address & ” adresinde Bulundu.”
End If
Next i
End Sub


Yazar: mmustafaaslan

2004 yilindan itibaren ozel bir sirketin finans departmaninda calismaktadir. Kendini excel, visual basic kullaniminda gelistirmis olan yazarimiz; Meslegi geregi SAP konusunda ileri derecede bilgilidir.

“Aralıkta Döngü ile Arama” için 1 yorum

Bir Cevap Yazın

E-posta hesabınız yayımlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir


5 + 6 =