我想在导入后从其他工作簿excel获得到其他链接的httplink。 https://prod-sdin.edf.fr/eam/domain/startflow.do?IFA_FAVORITE=true&IFA_FLOW_NAME=PassPortPanel&panelid=D030&keydata=XXXXXXXXX
Keydata it'变量并逐行更改。
我尝试了此操作,但原始工作簿中的问题是链接不在公式中。
If reg.test(sWorkSheet.Sheets(sSheet).Range("F" & i).Value) = True And (sWorkSheet.Sheets(sSheet).Range("F" & i).FormulaLocal Like "=LIEN_HYPERTEXTE*") = False Then
RFTCellOrigine = Trim(sWorkSheet.Sheets(sSheet).Range("M" & i).Value)
RFTRCellLink = Replace(TOTRCellOrigine," - ","")
sWorkSheet.Sheets(sSheet).Range("F" & i).FormulaLocal = "=LIEN_HYPERTEXTE(""https://prod-sdin.edf.fr/eam/domain/startflow.do?IFA_FAVORITE=true&IFA_FLOW_NAME=PassportPanel&panelid=D030&keydata=" & RFTCellLink & """; """ & RFTCellOrigine & """)"
End If