felds name in Excel

I have created a invoice with Excel. It allows users to input information on the it.

How easy to write a macro such that clear it will clear all the input fields on the excel invoice.

Some of the cells may not fix in a particular position. Can I make use of the range to mark the cell and then remove its content ? How can I make it work ?

Tks
AXISHKAsked:
Who is Participating?
 
Ejgil HedegaardConnect With a Mentor Commented:
Format all input cells as unlocked.
Make sure that all other cells are locked.
Then loop all cells in the UsedRange and clear contents for not locked cells.
The worksheet can be protected or not.

Sub ClearNotLockedCells()
    Dim ws As Worksheet
    Dim cel As Range, celM As Range
    
    Set ws = ActiveSheet
    For Each cel In ws.UsedRange
        If cel.Locked = False Then
            Set celM = cel.MergeArea
            celM.ClearContents
        End If
    Next cel
End Sub

Open in new window

0
 
JorgenCommented:
Hi it is very easy to make a macro for this.

The easiest way is to record a macro, and then do exactly what you want.

The code is slower than writing a VBA doing the same thing. But if you upload the file, it will only take a couple of minutes to write the VBA.

best regards

Jørgen
0
 
JorgenConnect With a Mentor Commented:
Hi again

I just pasted the code to clear Content of cell B4. That hopefully can show you the way forward. otherwise send the file, and I will try to write the full code.

Public Sub Clear_Content()
'---------------------------------------------------------------------------------------
' Procedure : Clear_Content
' Author    : Jørgen Wulff Rasmussen, Exceldoktor.dk Phone +45 2373 2009
' Date      : 14/02/2014
' Purpose   :This procedure is generated to show how to clear the content of a cell
' Modified
' Date          Developer             Action
' 14/02/2014    Jørgen Rasmussen      Created
'---------------------------------------------------------------------------------------
ThisWorkbook.Worksheets("Sheet1").Range("B4").Select
Selection.ClearContents
    
End Sub

Open in new window


Best regards

Jørgen
0
Free Tool: Subnet Calculator

The subnet calculator helps you design networks by taking an IP address and network mask and returning information such as network, broadcast address, and host range.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

 
AXISHKAuthor Commented:
Some content may not be fixed at special row. How can we handle it ?

Tks
0
 
JorgenCommented:
That is not a problem either. In Principal in the same way.

But try to send the file, and I will have a look.

I need you to be more specific at least

In general I would create a datasheet, where I stored past invoices, so you can return to these, instead of deleting them, but if that is your wish, then that is the easy part.

regards

Jørgen
0
 
Rob HensonFinance AnalystCommented:
Alternatively, set the Invoice file as a template by saving as .xlst and then when people use it to create a file it will be blank and no need to clear data.

Thanks
Rob H
0
 
AXISHKAuthor Commented:
tks
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.