Excel'de GetObject fonksiyonu, mevcut bir nesneyi (örneğin, bir dosya veya uygulama nesnesi) referans almak için kullanılır. Örneğin, mevcut bir Excel çalışma kitabını açmak ve onunla çalışmak için bu fonksiyonu kullanabilirsiniz.
GetObject fonksiyonunu kullanarak, bir Excel çalışma kitabını açma örneği şu şekildedir:
Sub AcExcelDosyasini()
Dim xlApp As Object
Dim xlWB As Object
' Excel uygulamasını al
Set xlApp = GetObject(, "Excel.Application")
' Çalışma kitabını al
Set xlWB = xlApp.Workbooks.Open("C:\DosyaYolu\OrnekDosya.xlsx")
' İşlemler gerçekleştirilir
' Örneğin, ilk hücreye değer atama
xlWB.Sheets(1).Cells(1, 1).Value = "Merhaba Dünya!"
' Excel'i görünür hale getirme
xlApp.Visible = True
' Temizleme
Set xlWB = Nothing
Set xlApp = Nothing
End Sub