Tag: vlookup filedialog

使用VBA使用用户select的文件在单元格中inputvlookup函数

我正在尝试构build一个将公式input到单元格中的子对象，并将该对象的公式放入lastrow中，然后复制公式并pastespecial->values整个范围的pastespecial->values 。 我在vLookup使用的表格位于单独的文件中，并不总是存储在相同的位置。 表总是格式相同，但表大小并不总是相同的。 我必须在4个不同的工作表上做这个，我必须input这个公式的列有一个“Order Grade”的标题。 我使用.Find返回“Order Grade”的位置。 然后我想进入我find“Order Grade”下面的Vlookup 1行。 如果我在工作表上手动input公式，它看起来像这样： =VLOOKUP(C2,[newpipe.xlsx]Sheet1!$A$1:$B$376,2,FALSE) 在VBA中 ，我想要构build的公式看起来像这样： =vlookup(RC[-1],stringFileName\[newpipe.xlsx]Sheet1!$A$1:LastColumn & LastRow,2,False 用户使用打开的文件对话框selectstringFileName。 所选工作表上的LastColumn和LastRow应该由macros来计算。 这是我迄今为止。 Private Function UseFileDialogOpen() Dim myString As String ' Open the file dialog With Application.FileDialog(msoFileDialogFilePicker) .AllowMultiSelect = False .Show If .SelectedItems.Count = 1 Then myString = .SelectedItems(1) 'MsgBox myString UseFileDialogOpen = myString Else MsgBox ("Failed […]