Excel Forum
ALTIN ÜYELİK Hakkında Bilgi


Geri Git   Excel Forum > EXCEL-Soruları > Makro-VBA
Atatürk
Şifremi Unuttum

DUYURU SİSTEMİ / REKLAM PANOSU

Makro-VBA Makro veya VBA ile ilgili sorularınızı buraya gönderebilirsiniz.
Dosya ekleyebilirsiniz

Özel Arama


Yanıtla
 
Paylaş Konu Araçları Görünüm Modları
Eski 20-09-2010, 15:43   #1
meraklimerakli
 
Giriş: 24/08/2010
Mesaj: 8
Excel Vers. ve Dili:
Excel 2007
Question Sadece belli hücrelerdeki resimleri silmek için makro

Merhabalar,
Aşağıdaki makro çalışma sayfasındaki bütün resimleri siliyor.

Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
Sub Resimleri_sil()
ActiveSheet.Shapes.SelectAll
Selection.Delete
End Sub
Sadece A10:B20 arasındakileri silmesini istiyorum. Bir kaç deneme yaptım ama başarısız oldu.
meraklimerakli Çevrimdışı   Alıntı Yaparak Cevapla
Eski 20-09-2010, 17:22   #2
hamitcan
Uzman
 
hamitcan kullanıcısının avatarı
 
Giriş: 01/07/2004
Mesaj: 7,054
Excel Vers. ve Dili:
Excel 2007 Türkçe
Varsayılan

Küçük bir dosya ekleyin.
hamitcan Çevrimdışı   Alıntı Yaparak Cevapla
Eski 20-09-2010, 17:40   #3
Korhan Ayhan
Moderatör
 
Korhan Ayhan kullanıcısının avatarı
 
Giriş: 15/03/2005
Şehir: ANTALYA
Mesaj: 22,810
Excel Vers. ve Dili:
OFFICE 2013-2016 PRO TR
Varsayılan

Selamlar,

Aşağıdaki konuları inceleyiniz.

Excelde Resim Ekleme
Belirli Bir Alandaki Resmin Tanımını Hücreye Yazdır
__________________
.
.
.

Soru sormadan önce forumumuzun aşağıdaki
bölümlerini incelediğinizde birçok sorunuza yanıt bulabilirsiniz.


Excel Dersanesi
Uygulamalı Excel Eğitimi
Excel İçin Örnek Uygulamalar
Video Dersane (***Altın Üyelere Özel***)

Lütfen sorularınızın çözümlendiğine dair geri dönüş mesajı yazınız...!
Lütfen yazım ve forum kurallarına uyalım...!
Lütfen sorularımızı açık ve net bir dille ifade edelim...!



FORUM KURALLARI
Korhan Ayhan Çevrimdışı   Alıntı Yaparak Cevapla
Eski 21-09-2010, 15:59   #4
meraklimerakli
 
Giriş: 24/08/2010
Mesaj: 8
Excel Vers. ve Dili:
Excel 2007
Varsayılan

Yapamadım arkadaşlar.
Grafik seçmek karışık geldi, anlayamadım.

Dosyanın son hali ekteki gibi. resimleri_sil makrosuna nasıl alan tanımı yapabilirim ?

http://www.paylasti.com/paylasti/fil...simekle222.rar
meraklimerakli Çevrimdışı   Alıntı Yaparak Cevapla
Eski 21-09-2010, 17:33   #5
hamitcan
Uzman
 
hamitcan kullanıcısının avatarı
 
Giriş: 01/07/2004
Mesaj: 7,054
Excel Vers. ve Dili:
Excel 2007 Türkçe
Varsayılan

Dosyanızı siteye ekleyin, herkes açamayabilir.
hamitcan Çevrimdışı   Alıntı Yaparak Cevapla
Eski 21-09-2010, 22:35   #6
Korhan Ayhan
Moderatör
 
Korhan Ayhan kullanıcısının avatarı
 
Giriş: 15/03/2005
Şehir: ANTALYA
Mesaj: 22,810
Excel Vers. ve Dili:
OFFICE 2013-2016 PRO TR
Varsayılan

Selamlar,

Aşağıdaki kodu kullanabilirsiniz. Kırmızı bölüme silmek istediğiniz hücre aralığını yazın.

Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
Option Explicit
 
Sub Belirli_Bir_Alandaki_Resimleri_Sil()
    Dim Resim As Picture, Alan As Range
    
    Set Alan = Range("B11:D20")
    
    For Each Resim In ActiveSheet.Pictures
        If Not Intersect(Resim.TopLeftCell, Alan) Is Nothing Then
            Resim.Delete
        End If
    Next
    
    Set Alan = Nothing
    
    MsgBox "İşleminiz tamamlanmıştır.", vbInformation
End Sub
__________________
.
.
.

Soru sormadan önce forumumuzun aşağıdaki
bölümlerini incelediğinizde birçok sorunuza yanıt bulabilirsiniz.


Excel Dersanesi
Uygulamalı Excel Eğitimi
Excel İçin Örnek Uygulamalar
Video Dersane (***Altın Üyelere Özel***)

Lütfen sorularınızın çözümlendiğine dair geri dönüş mesajı yazınız...!
Lütfen yazım ve forum kurallarına uyalım...!
Lütfen sorularımızı açık ve net bir dille ifade edelim...!



FORUM KURALLARI
Korhan Ayhan Çevrimdışı   Alıntı Yaparak Cevapla
Eski 01-01-2018, 12:25   #7
askm
Altın Üye
 
Giriş: 04/06/2005
Şehir: k.maraş
Mesaj: 1,834
Excel Vers. ve Dili:
2010-2016
Varsayılan

Korhan Bey kod için teşekkürler.
__________________
excel 2010- türkçe

Bu mesaj en son " 01-01-2018 " tarihinde saat 12:27 itibariyle askm tarafından düzenlenmiştir.... Neden: hatalı yazım
askm Çevrimiçi   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 21:47


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 - Lingerie - Dyeing Machine - Karton Bardak- Çorlu Dil 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- Kaplan Tekstil- Çorlu Perde- Çorlu Havuz- Makina- Danışmazlar-
Powered by vBulletin Version 3.7.2
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Advertisement System V2.6 By   Branden