Veri sayfasındaki bilgileri macro ile kritere göre getiriyorum. Yalnız macro da başlayanları getiriyor. Baş tarafı veya sonu belli olmayan, içerir olarak macroyu düzeltebilir miyiz? Yardımcı olan arkadaşlara teşekkür ederim.
Eklediğim resimde mavi ile seçili kısımda text kelimesi içerenlerin nasıl aranacağını gösteriyor program dilinde karşılığı "contain" oluyor
Sayın accessman macro kodu şu;
Dim liste(100000, 2) As String
Dim verikod, kod1, verifis As String
Sub Makro1()
On Error Resume Next
Range("B5").Select
Selection.CurrentRegion.Select
Selection.Clear
Range("B5").Select
Sheets("Veri").Columns("A:E").AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Range("B1:F2"), CopyToRange:=Range("B5"), Unique:=False
Range("F3").Select
End Sub
burada * karakteri nereye koyabilirim?
CriteriaRange:=Range("B1:F2")
bunun içine bir yerlere muhtemele
CriteriaRange:=*Range("B1:F2")*
Olabilir deneyerek bulacaksiniz