combobox

[@hmet]

dosya ektedir kolay gelsin

 

[Orion1]

Dosyanız ekte.

Sub Açılan1_Değiştir()
Cells(Range("A1").Value + 2, "A").Select
End Sub

 

[@hmet]

evren bey;
yalnızca isimleri listelemem gerek alt alta o kadar çok satır var ki, gerekirse tek tek seçip ekleyebilirim combobox'a veya koda ilave edebilirim

 

[Orion1]

Dosyanız ekte.

Sub Açılan1_Değiştir()
Dim k As Range
Set k = Range("A3:A65536").Find(Range("F2").Value, , xlValues, xlWhole)
If Not k Is Nothing Then k.Select
End Sub

 

[@hmet]

evren bey tşk emeğinize sağlık

 

[Orion1]

evren bey tşk emeğinize sağlık

Rica ederim.
İyi çalışmalar.

 

[armandos]

merhabalar

konu comboboxtan açılmışken, yazdırırken ya da önizlemede comboboxın ok işaretinin görünmemesi için ne yapabiliriz?

 

[leumruk]

Combobox üzerine gelin, sağ tıklayın. Denetim Biçimlendir>Özellikler adresinden "Nesneyi Yazdır" kutucuğunu boşaltın.

 

[armandos]

Combobox üzerine gelin, sağ tıklayın. Denetim Biçimlendir>Özellikler adresinden "Nesneyi Yazdır" kutucuğunu boşaltın.

bunu yaptığımda combobox tamamen görünmez oluyor. Ben sadece yanındaki comboboxı açmaya yarayanişaretin görünmemesini istiyorum. Bir yolu varmıdır?

İlginiz için teşekkürler..