Visual Basic'te hedef arama nasıl kullanılır

Neyse ki, Hedef Arayüzü tamamen VBA'ya entegre edilmiştir, bu yüzden kullanmak için bir makro yazmak kolaydır.

1. Adım

Hedef Arama makrosunu çalıştırmak istediğiniz Excel belgesini açın.

2. Adım

Hedef Arama'yı kullanmak istediğiniz iki hücreyi bulun. İlki, sabit bir hedefe sahip olduğunuz hücre olmalıdır. İkincisi, Excel'in hedefe ulaşmak için değiştirmesine izin verdiğiniz yerde olmalıdır. İlk hücrenin değeri, ikinci formüle dayalı bir formül olmalıdır (aksi halde, ilk hücrede görünmeyeceği için, ikinci hücrede Excel tarafından yapılan değişiklikler önemli değildir).

3. adım

Makro penceresini açın. Excel 2007'de veya daha sonra, listenin "Görünüm" sekmesini ve ardından "Makrolar" ı tıklayarak yapabilirsiniz. Excel'in önceki sürümlerinde, "Araçlar" menüsünü tıklayın, "Makrolar" ı ve ardından "Makrolar" ı seçin.

4. Adım

Makro penceresinde Hedef Arama makronuzun adını girin ve ardından "Oluştur" u tıklayın. Bu, Visual Basic programını editör uygulamaları için başlatacak ve size yeni bir Makro'nun metnini gösterecektir; bu, aşağıdaki gibi boş bir altprogram olarak görünecektir:

Sub MyMacroName () End Sub

Adım 5

Bilinen bir hedefe sahip olduğunuz hücreyi temsil eden bir nesne aralığı oluşturun (2. Adımın ilk hücresi). Örneğin, A1 hücresi için bir Hedef Arayüzü istiyorsanız, şunu yazın:

Dim goalCell As Range olarak goalCell = ThisWorkbook.Worksheet (1) .Range ("A1")

6. Adım

İlk hücreyi yeni hedefe ulaştırmak için Excel'in değiştirmesini istediğiniz hücreyi temsil eden bir nesne aralığı oluşturun. Örneğin, Excel'in A2 hücresini değiştirmesini istiyorsanız, şunu yazın:

Dim variableCell As Range olarak variableCell = ThisWorkbook.Worksheet (1) .Range ("A2")

7. adım

Hedef hücre aralığındaki GoalSeek yöntemini bulun. İlk argüman olarak, Hedef Aracını uygulamak istediğiniz değeri sunar; Bir argüman olarak, değişken hücre aralığını sunar. Örneğin, Hedef Aracını 0'a uygulamak isterseniz, şunu yazın:

goalCell.GoalSeek (0, variableCell)