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 08:27


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

Excel Eğitimi - Mobil Uygulama - Çorlu - Çorlu Web Tasarım -- Beylikdüzü mali müşavir - Beylikdüzü mali müşavir - Lingerie - Dyeing Machine - Karton Bardak- Karton Bardak- Çorlu Dil Konuşma Terapisti- Çorlu Dil Konuşma Terapisti- Çorlu Konuşma Terapisti- Çorlu Konuşma Terapisti- Çorlu Özel Eğitim- Site Yönetimi- Pronet Tekirdağ- Çorlu Kamera- Pronet Edirne- Pronet Çorlu- Çorlu Araç Takip- Çorlu Su Arıtma- Gebze Emlak- Rampa- Rotary- Çorlu İnternet Sitesi- Çorlu Sürücü Kursu- Çorlu Sürücü Kursu- Şişli Avukat- Edirne Serbest Muhasebeci- Çorlu Etüt- İstanbul Botanik- Çorlu Sigorta- Kağıt Bardak- Kağıt Bardak- Kaplan Tekstil- Çorlu Perde- Çorlu Perde- Çorlu Havuz- Çorlu Havuz- Makina- Danışmazlar- Çorlu Perde Yıkama- Çorlu Perde Yıkama- Okul Danışmanlık- Çorlu Ayakkabı- İzmit Sigorta- ADR'li taşıma kabı imalatı- Mekanik Tesisat- Çorlu Grafik Tasarım-
Powered by vBulletin Version 3.7.2
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Advertisement System V2.6 By   Branden