Results of 1 - 1 of about 6618 for リンク (0.004 sec.)
- [[20090821142719]]
- #score: 3107
- @digest: a6f951dbd4034e212e753e290957a224
- @id: 45036
- @mdate: 2009-08-21T06:47:13Z
- @size: 1223
- @type: text/plain
- #keywords: vntlink (29794), 海椿 (11199), 切構 (7748), breaklink (4813), xllinktypeexcellinks (4672), 椿） (4621), xlexcellinks (4320), ク削 (4213), linksources (4137), ト助 (3868), 括解 (3750), 定解 (2682), 解除 (2206), 部一 (2069), （北 (2018), リン (1385), ンク (1361), 北海 (1313), isarray (1269), hyperlinks (1078), 除() (1051), イパ (1015), ーリ (883), 般機 (883), 一切 (839), 集→ (754), ハイ (726), activeworkbook (714), チリ (673), の解 (660), クの (655), パー (646)
- 『マクロでリンクの設定解除』（北海椿）
マクロで、リンクの設定を一括解除する事はできますか? リンク先だとかは一切構わず、リンクの設定があったら全部一気に解除をしたいのです。 よろしくお願いします。 ---- Sub ハイパーリンク削除() ActiveSheet.Hyperlinks.Delete End Sub こんなので? （とおりすがり） ---- とおりすがりさん、ありがとうございます。 教えていただいたのはハイパーリンクを解除するマクロですよね。 私が質問したのは、一般機能で言うと、「編集→リンクの設定→リンクの解除」のリン クの解除なのですが、これもこのマクロで解除できるのでしょうか? 申し訳ありません、質問が下手でご迷惑をお掛けしますが、よろしくお願いします。 （北海椿） ---- リンクの解除ですと以下のようになると思います。 Sub Test() Dim vntLink As Variant, i As Long vntLink = ActiveWorkbook.LinkSources(Type:=xlLinkTypeExcelLinks) If IsArray(vntLink) Then For i = 1 To UBound(vntLink) ActiveWorkbook.BreakLink Name:=vntLink(i), Type:=xlExcelLinks Next i End If End Sub （momo） ---- momoさん、ありがとうございます。 リンクの解除がバッチリできました! 過去ログとかも探したのですが、見つからなくて困っておりました。 ホント助かりました。 ありがとうございました。... - http://www.excel.studio-kazu.jp/wiki/kazuwiki/200908/20090821142719.txt - [detail] - similar
PREV
NEXT
Powered by Hyper Estraier 1.4.13, with 97017 documents and 608140 words.
訪問者：