Finding Next Row In Excel To Add Data

[Micron]

Fair enough. To clarify, I'm saying that a With block is usually used where you want to deal with several properties or methods of the parent object (the focus of the With statement) and not just one. All of the bold words below are properties or methods of the parent object which is in red.

With fDialog
    .AllowMultiSelect = False
    .Filters.Clear
    .Filters.Add "Excel Spreadsheets", "*.xls, *.xlsx, *.xlsm, *.xlsb"
    If .Show Then
     strFileName = .SelectedItems(1)
     'Do something here
    Else
     MsgBox "message here."
     Exit Sub
    End If
End With

[DMT Dave]

Can see what you mean by the fDialog being the parent object, i do need to study more instead of playing, if i can praise myself, i do have several databases that work quite well with a good percentage of playing with code and seeing the help and advice from you guy's on here does kind of open up what is possible through a very complex Microsoft application, it can be quite eye opening....

I think adjusting your methods is probably the main changes required.

When I initially started coming away from wizards in the year dot to start forcing the results that wizards don't give, there are many things that helps such as simple things of keeping all Dims on one line such as

str
lng
int
bln
var

etc etc

Even that makes the declarations easier to read.

I still have a habit of copying old code that wasn't written good and make adjustments for a new procedure which is likely the wrong way.

Change habit and start new I'm sure will be agreed on here