如何显示来自当前工作表的参考的另一工作表的图像?

时间:2019-06-13 13:40:02

标签: excel vba excel-formula excel-2010

我有一个2工作表的excel工作区,其工作方式与本问题中的描述类似:

Excel - How to reference a value from another sheet with a reference from current sheet

如何使用sheet2的索引引用将sheet1sheet1的图像显示出来?评论之一建议使用VBA,但是,我对此并不陌生。一些单元格中缺少图像,在这种情况下,我只想跳过它们。

请明确说明,sheet2包含一个测验问题数据库,其中一些问题具有相应的图像。在sheet1中,我想从sheet2中随机选择一些问题以构成测验。通过使用以上链接的答案,我可以使用问题的文本来完成此操作。但是,我希望在任何情况下都显示sheet2中的相应图像。

下面是我的Excel工作区中的一些图像。

enter image description here enter image description here

我想将问题154sheet2显示到sheet上。我可以使用以上链接的答案来做到这一点。但是,我无法像下面的图像一样显示sheet1的相邻图像。我尝试使用命令=INDEX(sheet2!C:C,($A1 - 1)*4 + 1),但失败了。

1 个答案:

答案 0 :(得分:0)

Sub FormulaMacro()
'
' FormulaMacro Macro
'

'
 ActiveCell.Value = ActiveCell.Row
 idx = ThisWorkbook.Sheets(1).Range("A" & CStr(ActiveCell.Row)).Value
 Source = "C" & CStr((idx - 1) * 4 + 1)
 Target = "C" & CStr(ActiveCell.Row)
 ThisWorkbook.Sheets(2).Range(Source).Copy
 ThisWorkbook.Sheets(1).Range(Target).Select
 ThisWorkbook.Sheets(1).Paste


 End Sub