Thema Datum  Von Nutzer Rating
Antwort
Rot Hyperlink(zu neuem Blatt) auf neusten Shape
 25.02.2016 12:45:16 Moped_Werner
*****
NotSolved
25.02.2016 18:49:22 Gast30533
NotSolved
25.02.2016 23:26:30 Moped_Werner
NotSolved
26.02.2016 10:40:01 Gast57917
NotSolved

Ansicht des Beitrags:
Von:
Moped_Werner		 Datum:
25.02.2016 12:45:16		 Views:
1077		 Rating:
     
Antwort:
  Ja
Thema:
Hyperlink(zu neuem Blatt) auf neusten Shape

Hallo, ich hääte ein kleines VBA Problemm und komme mit der Hilfe aus dem Netz nicht weiter:

'Mein Code erstellt ein neues Tabellenblatt.
'Anschließend wird es mit einer Variablen umbenannt. (TbName)
'Danach wird ein Shape auf der Übersichtsseite Kopiert 
'und auf der Übersichtsseite eingefügt.
'Dieses neue Shape soll nun auf Sheet(TbName) verweisen
 
 ActiveSheet.Shapes.Range(Array("Straight Arrow Connector 2")).Select
 Selection.Copy
 Range("A2").Select
 ActiveSheet.Paste

 x = ActiveSheet.Shapes.Count

ActiveSheet.Hyperlinks.Add Anchor:=ActiveSheet.Shapes(x), Address:=””, SubAddress:=Sheets(TbName).Range("A1"), TextToDisplay:=Name


'So funktioniert das leider nicht, aber keinerlei Ahnung wieso.
'Ich hoffe es kann jemand helfen!

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Hyperlink(zu neuem Blatt) auf neusten Shape
 25.02.2016 12:45:16 Moped_Werner
*****
NotSolved
25.02.2016 18:49:22 Gast30533
NotSolved
25.02.2016 23:26:30 Moped_Werner
NotSolved
26.02.2016 10:40:01 Gast57917
NotSolved