How to use named ranges in excel vba?

JBeaucaire · #2 01-25-2012, 02:03 AM

Based on what I see, even that isn't needed. You can look up column A of the Databas sheet and find the last row with data, add 1, then insert values across that row as per your form.

Code:

Option Explicit

Public Sub Save_Click()
Dim NextRow As Long

With Sheets("Databas")
    NextRow = .Range("A" & .Rows.Count).End(xlUp).Row + 1
    .Range("A" & NextRow).Value = Me.cboRisk.Value
    .Range("C" & NextRow).Value = Me.txtProblem.Value
    .Range("F" & NextRow).Value = Me.cboStatus.Value
End With

End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
email as pdf attachment - subject line and attachment named after mail merge	Nexus	Mail Merge	12	04-13-2011 11:34 PM
Named range drop-down	jgelpi16	Excel	1	04-08-2011 03:08 PM
Dynamic Named Ranges using text	hannu	Excel	0	06-22-2010 04:42 PM
Can't import home adresses in outlook 2010 from excel named ranges	eekie	Outlook	0	05-14-2010 02:04 PM
Opening multiple Excel files within the same Excel window.	lost9471	Excel	2	05-01-2010 01:57 PM