檢查文件名是否等於其他文件單元格值

我有一個主Excel文件，它有一個變量名稱。我的VBA代碼可以讓我從masterFile.From打開另一個Excel文件，該代碼檢查文件名是否等於其他文件單元格值

With Application.FileDialog(msoFileDialogFilePicker) 
    .InitialView = msoFileDialogViewDetails 
    .Title = "Bitte die neue Exceldatei(*.xls) für die Verknüpfungsaktualisierung auswählen" 
    .ButtonName = "Auswählen" 
    .InitialFileName = Worksheets("Vorgaben").Range("C8").Value & "*.xlsm" 
    .AllowMultiSelect = False 

    If .Show = 0 Then Exit Sub 

    sPfad = VBA.CurDir 
    vDatei = .SelectedItems(1) 
    sExcelFile = Mid(vDatei, Len(sPfad) + 2) 
End With 

NeuerLink = vDatei 
Workbooks.Open Filename:=NeuerLink 

osman = Right(NeuerLink, Len(NeuerLink) - InStrRev(NeuerLink, "\"))

我的問題是，當我打開這個新的文件中單元格F6值應等於我的變量名稱主文件的價值。如果這是真的我想繼續我的代碼，當單元格F6有不同的值，我想有一個錯誤消息，這是「錯誤」。

我該怎麼做？

來源

2016-03-01 Yigit Tanverdi

什麼是變量名稱主文件？ – dev1998

我可以用不同的名稱保存它，在我的程序中，變量名爲anan，anan包含一些用戶輸入，這些輸入已經正常工作。我只需要檢查這個變量像anan = Worksheets.Range或sthr就像我無法弄清的 –

下面是一個if語句的例子，你可以用你的代碼中使用：

Sub IfExample() 

    ' Here is where your existing code can go. 

    If Cells(6, 6).Value <> anan Then 
     MsgBox ("Error") 
     GoTo ExitHere 
    End If 

    ' Here is where you can put the code that you want to continue to. 


ExitHere: 

End Sub

來源

2016-03-01 16:34:00 dev1998

這是什麼值I6然後呢？ –

我不知道I6中是什麼。 if語句基於您的問題描述中的這句話：「當我打開這個新文件時，單元格F6中的值應該等於我的變量名稱masterfile的值。 – dev1998

檢查文件名是否等於其他文件單元格值

回答

相關問題