החלת עיצוב על עמודה של תאים באקסל עם היפר לינק

הי
יש לי עמודה עם קישורי יוטיוב
אני משנה את התא הראשון באופן שהשם שמוצג יהיה LINK (ואשמח בהקשר זה לדעת אם יש רעיון אחר כמו כפתור מיוחד וכו') וזאת במקום כתובת הלינק הארוכה שמופיע כרגע.
איך גוררים את עיצוב של ההיפר לינק כאמור לעיל, על כל העמודה? ז"א שרק שם הקישור (LINK) ייגרר לכל אורך העמודה אבל תוכן הלינק יישאר בהתאם לכל תא

תודה

1745413200100.png
 

מיכאל אבידן

Active member
מנהל
הי
יש לי עמודה עם קישורי יוטיוב
אני משנה את התא הראשון באופן שהשם שמוצג יהיה LINK (ואשמח בהקשר זה לדעת אם יש רעיון אחר כמו כפתור מיוחד וכו') וזאת במקום כתובת הלינק הארוכה שמופיע כרגע.
איך גוררים את עיצוב של ההיפר לינק כאמור לעיל, על כל העמודה? ז"א שרק שם הקישור (LINK) ייגרר לכל אורך העמודה אבל תוכן הלינק יישאר בהתאם לכל תא

תודה

צפה בקובץ המצורף 127006
.
מבוקשך ניתן לביצוע, בקלות, ע"י מקרו קצרצר.

יצאתי מנק' הנחה שטווח התאים הוא A1:A30 (אתה רשאי לשנות זאת לצרכיך).


קוד:
Sub ReplaceHyperlinkText()
    Dim ws As Worksheet
    Dim CL As Range
    Set ws = ActiveSheet
For Each CL In ws.Range("A1:A30")
         If CL.Hyperlinks.Count > 0 Then CL.Hyperlinks(1).TextToDisplay = "LINK"
    Next
End Sub
 
נערך לאחרונה ב:
אשמח גם להתייחסותך בנושא אחר שהעלתי לפני כמה זמן
אולי יש לך מה להוסיף/להציע מכבר למה שהוצע שם?
ראה כאן
 
הי
מכיר את הנוסחה והשימוש
העניין שאני רוצה להפוך את עמודת הקישורים הקיימים מכתובת קישור לשם: LINK
ולא להוסיף נוסחה בעמודה נפרדת.
האם זה אפשרי?
 
לדעתי, אם אתה דורש "בלי עמודה נוספת" הפתרון יפול בגלל חישוב מעגלי:(
מאידך, יש כאן הרבה מומחים טובים ממני בהרבה:) נא המתן להם:)
מאידך (2) אפשר לכתוב מקרו שיעשה את זה "על אותו תא":)
 
הכוונה היא לשנות את מה שקיים (וזה הרבה רשומות) ל LINK כאמור
ומכאן והליך, אני כבר מכניס מראש כ-LINK

תודה על הניסיון לסייע :)
 
למעלה