☰

用户场景：单击 Windows 桌面图片打开 Excel

tag-icon • tag-icon microsoft-excel
用户场景：单击 Windows 桌面图片打开 Excel

我有多种产品的图片。我必须将每张图片与 Excel 工作表链接起来，这样当我单击图片时，就会打开正确的 Excel 工作表。我该怎么做？

是的，这些图片都在我的电脑里。这些图片是产品的图片，当用户点击产品图片时，他想在 excel 表中打开产品的价格栏。excel 表已完成。我试过了，但找不到解决方案。请您提供一些解决方案。也许必须先将它们上传到网站上？

答案1

将图片插入单元格：

  1. 插入选项卡（在功能区上），插图部分，图片->打开对话框，选择图像。
  2. 将图像的尺寸调整得足够小，并将单元格调整得足够大，以便图像能够适合单元格。
  3. 将图像锁定到单元格中：右键单击图像，大小和属性...->打开对话框，属性部分（如果关闭则通过单击属性展开），选择移动和随单元格调整大小（&根据需要打印）。

将单元格链接到此工作簿中的工作表：

  1. 右键单击单元格中的图像，选择链接，打开对话框。
  2. 在“链接到：”部分中，选择“此文档中的位置”。
  3. 根据需要修改单元格引用。
  4. 选择“屏幕提示...”，并根据需要输入鼠标悬停文本。单击“确定”
  5. 单击“确定”。

替代：整个单元格作为可点击的链接（不仅仅是图像）。

  1. 按照步骤将图像放置在电子表格单元格中（不妨碍的地方）。
  2. 复制此单元格（不是图像）。使用箭头键而不是鼠标选择单元格可能更容易，然后按Ctrl-c进行复制。
  3. 右键单击链接单元格，选择性粘贴...，其他粘贴选项部分（在底部），右侧带有链接的剪贴板（有两个像这样），选择带有屏幕提示或标签“链接图片”（而不是“粘贴链接”）的剪贴板。
  4. 完成“将图片插入单元格 - 将图像锁定到单元格中”的第 3 步
  5. 完成“将单元格链接到此工作簿中的工作表”的所有步骤。步骤 1 的注意事项：右键单击单元格（因为整个单元格与图像是一体的 -资料来源：尤达）。

答案2

首先将每张图片的名称设置为所需目标表的名称。（因此我们有一个名为“狗”的图片或形状以及一个名为“狗”的工作表）

然后将此宏分配给所有图片：

Sub ClickMe()
    Sheets(ActiveSheet.Shapes(Application.Caller).Name).Activate
End Sub

编辑＃1：

宏很容易安装并使用：

  1. ALT-F11 打开 VBE 窗口
  2. ALT-I ALT-M 打开新模块
  3. 粘贴内容并关闭 VBE 窗口

如果您保存工作簿，宏将随之保存。如果您使用的是 2003 以后的 Excel 版本，则必须将文件保存为 .xlsm 而不是 .xlsx

到消除宏：

  1. 调出如上所示的 VBE 窗口
  2. 清除代码
  3. 关闭 VBE 窗口

到使用Excel 窗口中的宏：

  1. 单击相关的图片或形状

要了解有关宏的更多信息，请参阅：

http://www.mvps.org/dmcritchie/excel/getstarted.htm

和

http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx

必须启用宏才能使其工作！

答案3

用户场景：单击 Windows 桌面图片打开 Excel

具体来说，Excel 工作簿的工作表和单元格与图标图像中的产品相关联。
假设用户将单击产品图像的图标，无论是在桌面上还是在其他文件夹中。 先前的答案假设图像位于 Excel 工作簿内工作表的单元格中。

为了实施此解决方案，首先要为每个产品创建图标图像。有教程和网站可以进行这些转换。有些产品可以将多个图标放入一个文件中。将产品图像转换为一个或多个图标文件后，继续操作。

解决方案如下：

With createobject("Excel.Application")
    .Goto .Workbooks.Open(WScript.Arguments.Named.Item("book")). _
        Worksheets(WScript.Arguments.Named.Item("sheet")). _
        Range(WScript.Arguments.Named.Item("range"))
    .visible = True
End With
  • 将代码保存到名为Excel快捷方式.vbs并确保文件具有“.vbs”扩展名。
  • 创建此文件的快捷方式。（快速提示，拖动文件图标并按住Alt之前和之后，同时释放鼠标左键。）
  • 重命名快捷方式产品1名称，无论它是什么（不需要文件扩展名）。
  • 右键单击产品1名称文件快捷方式图标并选择Properties。
  • 在里面特性对话框中，选择Shortcut选项卡并进行以下两项更改：
    1. 在Target文本框中，末尾之后...\ExcelShortcuts.vbs（以及任何结束引号之后）：
      • 添加空格和/book:"C:\Users\name\Desktop\ProductWorkbook.xlsx" /sheet:Sheet1 /range:A1
      • /book:FilePath\FileName根据产品情况替换文件路径和名称
      • /sheet:Sheet1更改Sheet1为产品的工作表名称。如果工作表名称有空格，请在 之后立即使用引号:。/sheet:"Quote Special Chars ! too"
      • /range:A1将 更改A1为要关注的单元格地址。
    2. 点击Change Icon...
      • 导航到Browse包含产品图标图片的文件夹 ()，然后选择该产品的图像。
      • 点击OK
  • 点击OK

现在有一个带有产品图像的快捷方式。该快捷方式指向特殊的 VBSCript，它将打开 Excel。脚本将使用提供给快捷方式的参数来了解要打开哪个工作簿、要转到哪个工作表以及要关注哪个单元格。

为Excel快捷方式.vbs脚本。将每个快捷方式重命名为产品名称。修改快捷方式目标（添加 /book: /sheet: /range:）并将图标图像更改为代表产品的图像。

编辑-修复 VBS 文件扩展名。

相关内容