Bir Sayfaya Arka Plan Resmi Olarak Resim Konabilir Mi?

[bezl]

Excelde sayfanın altına arka plan resmi koymak istiyorum. Böyle bir şey mümkün mü?

 

[VisualBasic]

Sub Bicim_ArkaPlan()
  ActiveSheet.SetBackgroundPicture Filename:="C:\gul.jpg"
End Sub

 

[bezl]

Cevabınız için çok teşekkürler VisualBasic...
Küçük resimleri uzat gibi bir seçeneği var mı?

 

[bezl]

Bir de bu arkaplanı nasıl kaldıracağımı söylerseniz.
kodu sildim, resmi de sildim ama hala orda duruyor.

 

[Levent Menteşoğlu]

Biçim-sayfa-arka plan dan kaldırabilirsiniz.

 

[VisualBasic]

Sub sil()
  ActiveSheet.SetBackgroundPicture Filename:=Empty
End Sub

Sub sil2()
  ActiveSheet.SetBackgroundPicture Filename:=""
End Sub

 

[efee2000]

Bir başka basit bir yöntem;
çalışma sayfanızdan biçim seceneğini tıklayın, açılan menüden sayfa seçeneğini tıklayın, sayfa seçeneğinde açılan listeden arka plan seçeneğine tıklarsanız resimlerinizin olduğu browse penceresini açarak istediğiniz resimi seçebilirsiniz.. silmek içinde aynı yöntemle arka planı sil seceneğini tıklamanız yeterli..

 

[bezl]

Çok teşekkür ederim...

 

[VisualBasic]

Cevabınız için çok teşekkürler VisualBasic...
Küçük resimleri uzat gibi bir seçeneği var mı?

Rica ederim. Sorununuz çözüldü ise ne mutlu

Küçük resimleri uzat gibi bir seçeneği var mı: bunu bilmiyorum.

Makroların adlarındanda excel karşılıklarını bulabilirsiniz.

mesela; Bicim_ArkaPlan yani biçim menüsünden- Sayfa- Arka plan anlamındadır.

Sub Bicim_ArkaPlan()
ActiveSheet.SetBackgroundPicture Filename:="C:\gul.jpg"
End Sub

 

[esolen]

Resimler Çok Büyük Geldi.
Resimleri Küçülte bilirmiyiz

 

[VisualBasic]

Resimler Çok Büyük Geldi.
Resimleri Küçülte bilirmiyiz

Arka plan eklenmesi işleminin sonucu budur.

Ancak Resim eklerseniz boyut değiştirebilirsiniz.

Sub ResimBoyutu()
    Dim resim As Object
    ActiveSheet.Pictures.Insert ("C:\Gul.jpg")
    Set resim = ActiveSheet.DrawingObjects
      resim.ShapeRange.Height = 600
      resim.ShapeRange.Width = 700
    Set resim = Nothing
End Sub

 

[ahmtcn19]

Merhaba başka bir çalışma sayfasındaki arka planı nasıl kopyalayabiriz.

Merhaba Arkadaşlar , başka bir çalışma sayfasındaki arka planı nasıl kopyalayabiriz.Kendi çalışma sayfamıza eklemek için ne yapabiliriz. Örnk Dosya ekte...:hey:

 

[Seyit Tiken]

Sayfa olduğu gibi kopyalanırsa oluyor. Diğer kopyalama seçenekleriyle olmuyor. Ctrl basılı tutarak mausun sol düğmesine tıklanarak bu işlemi yapabilirsiniz.

 

[ahmtcn19]

Sn : Seyit Tiken Teşekkür ederim.

Sayfa olduğu gibi kopyalanırsa oluyor. Diğer kopyalama seçenekleriyle olmuyor. Ctrl basılı tutarak mausun sol düğmesine tıklanarak bu işlemi yapabilirsiniz.

Sn : Seyit Diken Teşekkür ederim. İyi çalışmalar:hey:

 

[ANTALYA 01]

B

Merhaba

Sayfayı seçiyorum CTRL Tuşuna basıyorum başka sayfaya yapıştır diyorum Olmuyor.Burdaki püf noktayı adım adım anlatırmısınız rica etsem.

 

[ahmtcn19]

Merhaba ANTALYA 01

Merhaba

Sayfayı seçiyorum CTRL Tuşuna basıyorum başka sayfaya yapıştır diyorum Olmuyor.Burdaki püf noktayı adım adım anlatırmısınız rica etsem.

Exceldeki bir sayfayı başka sayfaya kopyalamak için ;
Önce kullandığın excel sayfasını açıyorsun , sonra pencereden yan yana karşılaştırı açıyorsun iki excelde yan yana gelince , Ctrl tuşuna basılı tutarak farenin sol tuşu ile basılı tutarak sürüklüyorsun diğer excel e.Sadece Ctrl ye basarsan tüm sayfa olduğu gibi kullandığın Excel e geliyor , Eğer kopyalamak istiyorsan aynı anda Ctrl+Alt tuşunada aynı anda basılı tutmalısın .Umarım anlatabilmişimdir . İyi çalışmalar..

 

[ANTALYA 01]

D

Teşekkürler

 

[ahmtcn19]

Teşekkürler

Rica Ederim. İyi çalışmalar