VBA/Excel如何將ActiveCell保存爲對象

我需要從Excel列表中創建登錄文本。我用宏嘗試自己，寫一個小腳本。基本上我有兩個單元格緊挨着另一個。第一個獲得ssh密鑰名，第二個獲得密碼。這2值取決於機器的操作系統，在其他字段中指定。最後，我有一個帶有os名稱的表和密碼旁邊的ssh密鑰。VBA/Excel如何將ActiveCell保存爲對象

這是我寫的：

Function FindKey(FirstCell As Range) As String 
' 
' FindKey Macro 
' Find the ssh key in function of the OS 
' 
Dim Find As Boolean 
Dim Cell As Range 
Dim OS As String 


Cell = ActiveCell.Address 
ActiveCell.Offset(0, 4).Value = OS 
Find = False 
While Not Find 
    ActiveCell = FirstCell.Address 
    If ActiveCell.Value = OS Then 
     FindKey = ActiveCell.Offset(0, 1).Value 
     Cell.Offset(0, 1).Value = ActiveCell.Offset(0, 2).Value 
     Cell.Select 
     Find = True 
    Else 
     ActiveCell.Offset(1, 0).Select 
     If IsEmpty(ActiveCell) Then 
      Cell.Select 
      FindKey = CVErr(xlErrNull) 
      Find = True 
     End If 
    End If 

Wend 
' 
End Function

我真的沒有的，我想怎麼寫這個想法。我只能在變量中存儲單元格地址嗎？我可以將它用作下一個對象嗎？

謝謝您的時間，並有一個愉快的一天

來源

2016-04-22 Guillaumedk

是你面對的問題，當你需要使用關鍵字集你發佈的代碼？你需要什麼功能才能返回？ – user3598756

這個問題，它進行了劑量編譯。我wilsh返回鍵名得到這個： ActiveCell.Value = OS然後 FindKey = ActiveCell.Offset（0，1）。值和密碼短語關聯在下一個右側單元格 – Guillaumedk

dim yourCell as Range 
set yourCell = ActiveCell

和

set yourCell = FirstCell

設置的對象引用

來源

2016-10-03 11:17:24 Jbjstam

VBA/Excel如何將ActiveCell保存爲對象

回答

相關問題