Merhabalar, Sayın MUygun,
Cevabınız için teşekkürler, masa üstünde, önce A klasörü isimli dosya atım, içerisine,exceli ve resim isimli ikinci klasör oluşturdum, resimleri sayısal isimle içine resim klasörüne koydum. Fakat resim değişimi olmadı.
Kontrol edebilir misiniz.
Saygılarımla
Merhaba dosya ile aynı klasör içindeki resimleri A1 hücresine getirir.
Option Explicit
Sub Ayni_Klasor_Resimler()
Dim MyPath, ResimYolu, Resim, Res, x, i
Dim uzanti()
For Each Res In ActiveSheet.Shapes
If Res.Name <> "Button 5" Then
Res.Delete
End If
Next...
merhaba,
Klasörüm iinde 3000 yakın resim var ve bunlar gün be gün çoğalıyor ..
Resim adı 20KB0001111 ürün kodları da aynı şekilde olmaktadır...
Sayfa 2 de A3 hüçresinde VERİ DOĞRULAMA Sayfa 1 den cekiyorum D3 hüçresine ise A3 den değiştirdikce D3 hüçresinde resimde tek tek değişmesini...
Merhaba, C altında Fotolar isminde bir klasör var. Liste ve haliyle resimler değişebiliyor. Liste değiştiğinde o listede bulunan bilgiye ait resim dosyasının da gelmesi gerekiyor. F2+Enter burada işe giriyor.
Sayfanın kod bölümüne bu kodu yapıştır.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
klasor = ThisWorkbook.Path & "\"
dosya = klasor & "Resimler\" & Cells(Target.Row, 1).Value & ".jpg"
MsgBox dosya
If dosya <> "" Then
CreateObject("Shell.Application").Open...
Merhaba,
Hücre ile eşleşen durumlarda sayfama resim getiren aşağıdaki gibi kodum var ama hücre değeri ile resim adı aynı olması gerekiyor.
İstediğim resmin adı hücre değerini içeriyorsa resim getirmesi
örnek;
hücre değeri: 140255
resim adı :140255 tkm
gibi durumlarda resim gelmesini...
Merhaba Arkadaşlar,
Bir excel sayfamda vesikalık resim boyutunda bir resim var. bu resme formül ile görüntü atayabiliyorum. Bunda sorun yok. Ama istiyorum ki Exceldeki resme aşağıda adresi belirtilen resmi bağlamak mümkün mü ?
C:\SUNUM\resim1.jpg
Bu kod da resim isimlerindeki kaymalar önlendi
Örnek d5.docx dosyasında 91 ve 162 sayfalarda iki adet resim olduğundan isimlerde kaymalar oluyordu kod iki resim olan hücrelerde sadece birincisini görüp işlem yapıyor.
'referanslar
'Microsoft Word 12.0 Object Library
Sub deneme6()
Set klasor =...
Bu kadu dene
kodun işleyişi resim nesnesinin adını önce hafızaya alıyor sonra da resimi kopyaladığında resim adını yazdırıyor bu durum da kod zaman olarak tam iki kat uzadı.
'referanslar
'Microsoft Word 12.0 Object Library
Sub deneme5()
Set Klasor =...
Konudaki dosyalar bir gün işe yarar şeklinde arşivlik.
Öncelikle emekleriniz için teşekkürler.
Sayın @halit3 Bey,
Dosyanızı Office 2016'da denedim. PPApp.ActiveWindow.Selection.SlideRange.Shapes("Rectangle 2").Select satırında hata verdi.
Düzenleme yapabilir misiniz? Aslen Office 2010...
Alternatif dosya ekliyorum.
referanslarda bu olmalı
microsoft powerpoint xx.0 object library
Resim Dosyalarını Bul komut düğmesinden resimlerin bulunduğu klasör seçilecek daha sonrada İşlemi başlat komut düğmesine tıklanacak
Söz konusu işlemi yapmak üzere Excel VBA ile bir kod hazırladım. Buna göre;
-Bu mesaj ekindeki sıkıştırılmış dosyayı bilgisayarınızda bir yere çıkartın. Bu klasörün içindeki Excel dosyasını açın, sayfanın üzerindeki butona tıklayın.
-Bu klasörün içindeki tüm alt klasörlerdeki (Balıklar...
Merhaba, @Haluk Bey'in belirttiği şekilde ekleme yaparken tek bir dosya haline getiremiyorsanız: Resim seçme ekranında Sağ üstte bulunan ARA kutusunu kullanın, aramanızı *.jpg şeklinde yaparsanız Alt klasörler dahil tüm jpg dosyalarını listeler, bu pencerede görünümü değiştirip AYRINTILAR...
Ben de, C sürücüsüne resim ismiyle klasör açtım. İçine bir numara vererek foto attım. Excel dosyasında resim dosyasına verdiğim ismi yazınca resim geldi.
@PriveT dosyada hiç oynama yamadım. c:\resim , c sürücüsüne yeni klasör açtım denedim olmadı.
Çok özür dilerim.. Tekrar denedim. Sıkıntı benden kaynaklanıyor. Rar içinden çalıştırmam ve 2 etkinleştirmeye evet dememden .
Resim boyutunu ve yerini oynamam gerekiyor. Bunu Nasıl...
Tahsin Bey merhaba,
Benimde bir sorum olacak cevaplayabilceğinizi umuyorum.
Excelde bir çalışma sayfasını buton ekleyip butona VBA macro atayıp, dışarı export etmek istiyorum.
Fakat sayfa yapısı ve düzeni bozulmadan ama formulleri almayarak.
Aşağıda ki gibi bir şey denedim internette...
Belirlenen listeye göre otomatik olarak organizasyon şeması oluşturulur. 9 ayrı hazır şemadan biri ile organizasyon şeması oluşturulabilir.
İki farklı organizasyon şemasında Resim kullanılabilir. Listede sıralı olmasada üst yöneticiler belirlendikten sonra program organizasyon şemasını...
Ömer bey, cevabınız için teşekkür ederim. Öncelikle linki inceledim. (bilgisayar windows 7) kaydedeceği klasör yoktu, ben de açtım (RESİM 1)
daha sonra, kişisel makro kitabına kaydet dedim (RESİM 2). Ve şu uyarıyı alıyorum (RESİM 3) ve sonunda küçük bir pencere çıkıyor 'KAYDEDİLEMEDİ' diyor...
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.