Favorilerine Ekle | Giriş Sayfan Yap | Tavsiye Et

 

Kurs Tanıtım Sayfası | Süper Üye Kimdir? | Menü Tasarımı Konulu Örnek Ders
Kod İndir| Hazır Kodlar | Makaleler| İpuçları | VB .NET Kursu | Dersler | Forum | Alt Bölümler | Servisler
    Merhaba Misafir
    anasayfa » visual basic hazır kodlar » excelde kayan yazı
Üye Girişi
Kullanıcı Adı:  
Şifre : 
Kaydet ?
Siteden tam olarak faydalanabilmek için üye olmalısınız.
Unuttuğunuz şifrenizi öğrenebilmek için kayıt sırasında verdiğiniz Hatırlatma Cevabı'nı bilmeniz gereklidir.
Şifre hatırlatma işlevini sadece 3 defa kullanma hakkınız vardır.
Kullanıcı adını ve şifresini unutan üyelere email ile yardım verilmez.

Aktivasyon Gelmedi mi?Aktivasyon mesajınız email adresinize gelmedi mi?
Buraya tıklayarak bir kez daha aktivasyon mesajı gönderilmesini sağlayabilirsiniz.
Lütfen email hesabınızın BULK ve SPAM klasörlerini de kontrol ediniz.
Rastgele Makale

İKON

Yazar: sinansen75

Webmasterlar
Sitenize Ekleyin!
Sitenizde "Son Eklenen 10 Visual Basic Yazısı"'nı göstermek ve içeriğini zenginleştirmek için buraya tıklayınız.

Vbasicmaster.com'a link verin!
Aşağıdaki minik banneri sitenize eklemek için tıklayın!

Çevrimiçi Üyeler
mitnaity

Üye Sayısı:
Ziyaretçiler nerede?
Yayın № : 4963
Yayın Tar:14.11.2005
Yazar : onur34
Hit :10825

Bu Yazarın Yazıları Sadece bu yazarın örnek kod göster
Bu Yazıyı Tavsiye Et

excel sayfasında hüğcrede kayan yazı içIn şu makroyu deneyin
A1 b10 hücresi arasına yazdığız bilgiler d9 hücresinde kayan yazı olarak görünecektir
bence deneyin
Sub kay()
Dim MyStr As String
Dim i As Integer, j As Integer, k As Double
With Sheets("Sayfa1")
For i = 1 To 10
MyStr = MyStr & .Cells(i, 1) & " " & .Cells(i, 2) & " "
Next
MyStr = WorksheetFunction.Rept(" ", 255 - Len(MyStr)) & MyStr
.Range("d9") = MyStr
Do
For j = 1 To Len(MyStr)
DoEvents
For k = 1 To 3000000 'Kayan Yazı Hızını ayarlama
k = k + 1
Next
.Range("d9") = Mid(MyStr, j)
Next
Loop
End With
End Sub
ve clas Modülede şunu ekleyin
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
kay
End Sub





Yorumlar, eklemeler ve düşünceler
        bu kodları vba ya ekliyorum fakat d9 sütununa ne yazacağım onu bilemedim yardımcı olursan sevinirim yani yazıyı bir türlü kaydıramadım

   buthus, 18.11.2005 12:23
   dostum çok teşekkür ederim benim vize sınavımı kurtardın

   abdulkadir, 19.11.2005 20:34
   ben exelden biraz anlayan ama mokrolar ve dolayısı ile vbu ile arası pek iyi olmayan biriyim... eğer daha anlaşılır (örnekle beraber) yazarsanız minnettar olurum.

   akrepahmet, 23.02.2006 10:10
   Sayın buthus d9 a bir şey yazmayacaksın. Sen A1:B10 a verileri gir, d9 hücresine fare ile tıkla ve formül çubuğunu seyret.

   partner352, 23.08.2006 22:41
   teşekkürler


   murlak26, 16.07.2007 14:12
   ÇOK İYİ KOD


   msbe, 18.09.2007 14:16
   aferin sana çok yararlı bilgi

   alevcik, 04.02.2008 20:12
   teşekkür

   mudi, 12.05.2008 22:00
   teşekkürler elinize saglık

   hakan288, 11.02.2009 12:14
   teşekkürler.

   abbasonline, 14.11.2009 04:04
© Hakan Ersöz 2000-2013| Üyelik Sözleşmesi | | Ödeme Bildirimi
Sitemizden yenilikleri hemen öğrenin, pop upları engelleyin, chat yapın... ToolBarımızı indirin:
Vasicmaster Toolbar'ı indirin