Application.Dialogs().Show ? Parameters
08.06.2004 09:43:36
kdosi
ich habe ein Problem mit der Show Methode von dem FormulaFind Dialog.
Nachfolgender Code laesst das Dialogfenster erscheinen, was ist auch OK. Problem ist dabei, dass ich moechte, dass das Dialogfenster in dem ComboBox "Suchen" den Wert "ByColumns" vorgewaehlt hat.
Also : wie muss man den Argument der Show Methode aendern, damit nach dem das Dialogfenster erscheinnt, der Wert der Suche auf "ByColumns" vorgewaehlt ist? Oder anders noch : wie kann man den Wert in dem ComboBox "Suchen" durch die Show Methode aendern?
Danke! Mit freundlichen Gruessen kdosi aus CZ.
==============================================================================
' Code :
Private Sub FindDlg_Show()
Dim dlg As Dialog
Columns(2).Select
Set dlg = Application.Dialogs(xlDialogFormulaFind)
' text,
' in_num,
' at_num,
' by_num,
' dir_num,
' match_case,
' match_byte
Call dlg.Show(arg1:="Text", _
arg2:=True, _
arg3:=True, _
arg4:=xlWhole, _
arg5:=xlByColumns, _
arg6:=xlNext, _
arg7:=True)
End Sub