Excel Forum
ALTIN ÜYELİK Hakkında Bilgi


Geri Git   Excel Forum > EXCEL-Soruları > Excel'e Yeni Başlayanlar
Atatürk
Şifremi Unuttum

DUYURU SİSTEMİ / REKLAM PANOSU

Excel'e Yeni Başlayanlar Excel kullanmaya yeni başladıysanız sorularınızı buraya gönderebilirsiniz.
Dosya ekleyebilirsiniz

Özel Arama


Yanıtla
 
Paylaş Konu Araçları Görünüm Modları
Eski 17-09-2004, 14:29   #1
BLUESEA
 
Giriş: 01/09/2004
Şehir: izmir
Mesaj: 11
Varsayılan SAYFA ÝÇÝNDEKÝ BÝR SÜTUNUN DEÐERÝNE GÃ?RE SATIRIN TA

SELAM,
EKTE Ã?RNEÐİNİ GÃ?NDERDİÐİM SAYFADA YER ALAN TABLONUN " N " SÜTÜNUDAKİ BAKİYENİN " 0 " (SIFIR) OLMASI DURUMUNDA BU SATIRI KOMPLE BAÞKA BİR SAYFAYA TAÞIMASI İÇİN YARDIMCI OLURMUSUNUZ. ANCAK BU SATIR ÇIKTIÐI ZAMAN ALTTAKİ SATIRLARIN DA TAÞIDIÐIMIZ SATIRA KAYDIRMAK MÜMKÜNMÜ.
BİR DE BU SAYFADAN 20 ADET VAR.

YARDIMLARINIZ İÇİN ÞİMDİDEN TEÞEKKÜR EDERİM.

SAYGILARIMLA,
Eklenmiş Dosyalar
Dosya Türü: xls test.xls (14.5 KB, 24 Görüntülenme)
__________________
BLUESEA
BLUESEA Çevrimdışı   Alıntı Yaparak Cevapla
Eski 17-09-2004, 16:07   #2
ALPEN
 
ALPEN kullanıcısının avatarı
 
Giriş: 07/07/2004
Şehir: ANTALYA
Mesaj: 1,162
Varsayılan

selam

Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
Application.ScreenUpdating = False
I = 1
J = 1
While Not IsEmpty(ActiveWorkbook.Worksheets("sayfa1").Range("N" & I))

    If Worksheets("sayfa1").Range("N" & I) = 0 Then
    
        Worksheets("sayfa1").Rows(I).EntireRow.Copy Worksheets("sayfa2").Range("A" & (Worksheets("sayfa2").Range("N65536").End(xlUp).Row + J))
        Worksheets("sayfa1").Rows(I).EntireRow.Delete
        
        
    Else
        I = I + 1
    End If
Wend
Application.ScreenUpdating = True
edit:
verilerin bulunduğu sayfadaki 2. satırı karışıklık çıkarmaması için tamamen sildim.
__________________
http://datingsidorsingel.com/
ALPEN Çevrimdışı   Alıntı Yaparak Cevapla
Eski 17-09-2004, 17:19   #3
BLUESEA
 
Giriş: 01/09/2004
Şehir: izmir
Mesaj: 11
Varsayılan

ALPEN YARDIMIN İÇİN ÇOK TEÞEKKÜR EDERİM.

CEHALETİME VERİN AMA BEN BU MAKROYU ÇALIÞTIRAMADIM. MAKROYU KAYDEDİP SAVE'LEDİKTEN SONRA DOSYAYI KAPATIP AÇINCA

" Compile erro : Invalid outside procedure " hata mesajı veriyor.
__________________
BLUESEA
BLUESEA Çevrimdışı   Alıntı Yaparak Cevapla
Eski 17-09-2004, 17:42   #4
ALPEN
 
ALPEN kullanıcısının avatarı
 
Giriş: 07/07/2004
Şehir: ANTALYA
Mesaj: 1,162
Varsayılan

merhaba

aşağıdaki dosyayı inceleyin.
Eklenmiş Dosyalar
Dosya Türü: zip bluesea_132.zip (9.2 KB, 34 Görüntülenme)
__________________
http://datingsidorsingel.com/
ALPEN Çevrimdışı   Alıntı Yaparak Cevapla
Eski 17-09-2004, 18:08   #5
BLUESEA
 
Giriş: 01/09/2004
Şehir: izmir
Mesaj: 11
Varsayılan

İYİ AKÞAMLAR,

ALPEN BU BANA İKİNCİ YARDIMIN VE SANA OLAN BORÇLARIM ARTIYOR. ÇOK TEÞEKKÜR EDERİM.

SAYGILARIMLA,
__________________
BLUESEA
BLUESEA Çevrimdışı   Alıntı Yaparak Cevapla
Eski 17-09-2004, 18:14   #6
ALPEN
 
ALPEN kullanıcısının avatarı
 
Giriş: 07/07/2004
Şehir: ANTALYA
Mesaj: 1,162
Varsayılan

evet 6 duble oldu. hehe
__________________
http://datingsidorsingel.com/
ALPEN Çevrimdışı   Alıntı Yaparak Cevapla
Yanıtla


Konu Araçları
Görünüm Modları

Gönderme Kuralları
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is Açık
SimgelerAçık
[IMG] kodu Açık
HTML kodu Kapalı


Saat 05:56


Bu forum Elit NET - www.elitnet.com.tr tarafından sunulmaktadır.

Excel Eğitimi - Mobil Uygulama - Çorlu - Çorlu Web Tasarım - Tarot Falı - invest in turkey - Lingerie - Dyeing Machine - Karton Bardak- Çorlu Özel Eğitim- Site Yönetimi- Led Aydınlatma- Pronet Tekirdağ- Çorlu Kamera- Pronet Edirne- Pronet Kırklareli- Pronet Çerkezköy- Pronet Çorlu- Pronet Lüleburgaz- Pronet Keşan- Çorlu Araç Takip- Çorlu Su Arıtma- Boru Profil- Gebze Emlak- Beylikdüzü Temizlik- İstanbul Burun Estetiği- Bakır Sülfat- Rampa- Rotary- Çorlu İnternet Sitesi- youngblood- Çorlu Palet- Çerkezköy Palet- Çorlu Prefabrik- Çorlu Sürücü Kursu- Çorlu Sandviç Panel- Şişli Avukat- Korona Test Kalemi- Çorlu Vinç- Çorlu Pimapen Tamiri- Çorlu Çelik Konstruksiyon-
Powered by vBulletin Version 3.7.2
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
Advertisement System V2.6 By   Branden