我的VBA Excel代码是一个Nutrifacts计算器。它计算了人工神经元,每个国家都有不同的布局和计算方式。 Nutrifacts布局在每个不同的工作表中。我尝试制作一个组合框,并选择用户选择哪个国家。
我想尝试添加更多内容。我想添加一个不同国家/地区的复选框,所选国家/地区将显示该工件。例如,我选择了美国,日本和中国。这三个国家的营养品将相互显示。我的问题是图片的定位(粘贴)。
请看这个截图:
代码:
If Me.chkCountry.Value = "TAIWAN" Then
ThisWorkbook.Sheets(10).Range("B5:I27").CopyPicture Appearance:=xlScreen, Format:=xlBitmap
With Sheet10.Pictures.Paste
.Left = Range("A1").Left ' <-- setting the left postion to Cell A1
.Top = Range("A1").Top ' <-- setting the top postion to Cell A1
End With
If Me.chkCountry.Value = "UNITED STATES" Then
ThisWorkbook.Sheets(10).Range("C5:I26").CopyPicture Appearance:=xlScreen, Format:=xlBitmap
With Sheet10.Pictures.Paste
.Left = Range("A1").Left ' <-- setting the left postion to Cell A1
.Top = Range("A1").Top ' <-- setting the top postion to Cell A1
End With