Gönderen Konu: [Çözüldü] Excel'de Açılan Kutu  (Okunma sayısı 11929 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı Orion1

  • Excelce Teğmen
  • ****
  • İleti: 351
  • Puan +10/-0
  • Cinsiyet: Bay
  • Excel'den Daha Fazlası!..
  • Ad Soyad: Evren Gizlen
Ynt: Excel'de Açılan Kutu
« Yanıtla #15 : 04 Nisan 2010, 12:57:06 »
abi bir kontrol edermisiniz gönderdiğinizi galiba olmamış
Olmuş .Bende bir problem gözükmüyor.
Bakın Kopyalanmış sayfada YEŞİL BURSA listboxta gözüküyor.
OYSA ilk sayfada BURSA yazıyor sadece.8)

Çevrimdışı voleclub

  • Excelce Çavuş
  • ***
  • İleti: 158
  • Puan +0/-0
  • Cinsiyet: Bay
  • Excel'den Daha Fazlası!..
  • Ad Soyad: mahmut özdemir
  • Mesleğiniz: öğretmen
Ynt: Excel'de Açılan Kutu
« Yanıtla #16 : 04 Nisan 2010, 13:41:43 »
kopyaladığım sayfalarında listbox veriyi hep sayfa 1 den alsın ama tıklayınca kendi sayfasının d1 inden başlayarak sıralı yazsın istiyorum. Benim gönderdiğim dosyada herşey istediğim gibi ama  kendi sayfasının d1 ine yazmıyorda kopyaladığım bütün sayfaların listboxı sayfa1 in d1 ine yazıyor.

Çevrimdışı voleclub

  • Excelce Çavuş
  • ***
  • İleti: 158
  • Puan +0/-0
  • Cinsiyet: Bay
  • Excel'den Daha Fazlası!..
  • Ad Soyad: mahmut özdemir
  • Mesleğiniz: öğretmen
Ynt: Excel'de Açılan Kutu
« Yanıtla #17 : 04 Nisan 2010, 14:00:16 »
mesela sayfa adlarını sayfa1,sayfa2,sayfa3,sayfa4  yaprtım ve her sayfanın kod peceresindeki sayfa1 yazan yerleri sayfa 2,sayfa3 sayfa4 olarak kendi sayfasının adını yazdım ve istediğim gibi oldu.ben nasıl sayfa adını ve sayfanın kod pencerisinde elle değiştirmeden her kopyaladığımda otomatik olarak bu işlerin yapılmasını sağlayacagım

Çevrimdışı Orion1

  • Excelce Teğmen
  • ****
  • İleti: 351
  • Puan +10/-0
  • Cinsiyet: Bay
  • Excel'den Daha Fazlası!..
  • Ad Soyad: Evren Gizlen
Ynt: Excel'de Açılan Kutu
« Yanıtla #18 : 04 Nisan 2010, 14:03:51 »
kopyaladığım sayfalarında listbox veriyi hep sayfa 1 den alsın ama tıklayınca kendi sayfasının d1 inden başlayarak sıralı yazsın istiyorum. Benim gönderdiğim dosyada herşey istediğim gibi ama  kendi sayfasının d1 ine yazmıyorda kopyaladığım bütün sayfaların listboxı sayfa1 in d1 ine yazıyor.
Dosyanız ektedir.8)
Kod: [Seç]
Private Sub ListBox1_Click()
Excelce_Sonsatir = WorksheetFunction.CountA(Range("D1:D65530"))
Range("D" & Excelce_Sonsatir + 1) = ListBox1.List(ListBox1.ListIndex)
End Sub

[Forum yazılım güncelleme esnasında sorun oluştuğundan eklendi silinmiştir.]

Çevrimdışı voleclub

  • Excelce Çavuş
  • ***
  • İleti: 158
  • Puan +0/-0
  • Cinsiyet: Bay
  • Excel'den Daha Fazlası!..
  • Ad Soyad: mahmut özdemir
  • Mesleğiniz: öğretmen
Ynt: Excel'de Açılan Kutu
« Yanıtla #19 : 04 Nisan 2010, 17:58:23 »
çok teşekküerle tam istediğim buydu.

Çevrimdışı Orion1

  • Excelce Teğmen
  • ****
  • İleti: 351
  • Puan +10/-0
  • Cinsiyet: Bay
  • Excel'den Daha Fazlası!..
  • Ad Soyad: Evren Gizlen
Ynt: Excel'de Açılan Kutu
« Yanıtla #20 : 04 Nisan 2010, 20:23:02 »
çok teşekküerle tam istediğim buydu.
Rica ederim.
İyi çalışmalar.8)