Új hozzászólás Aktív témák

• #6760 mr.nagy tag Fire/SOUL/CD #6757

  Új Válasz 2010-04-03 07:37:46 #6760

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  mr.nagy

  tag

  válasz Fire/SOUL/CD #6757 üzenetére

  Szia!

  Kipróbáltam, ahogy leírtad úgy működik is. Azonban ha cellából akarom a hivatkozást hozzáadni akkor nem. Mit rontok el? Így próbáltam:
  Private Sub CommandButton1_Click()
  
  Dim myPic As Object
  Set myPic = ActiveSheet.Pictures.Insert("A1")
  myPic.Left = ActiveSheet.Range("C5").Left
  myPic.Top = ActiveSheet.Range("C5").Top
  
  End Sub

  Egyébként azt meglehet oldani, hogy ha mondjuk az A oszlopban több URL található akkor automatikusan mindhez jelenítse meg a képet?

Új hozzászólás Aktív témák