View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
rodrigovim rodrigovim is offline
external usenet poster
 
Posts: 2
Default Insert or add one number at right side to ISBN

Many Thank Ron

but,

The 70.000 ISBNs was captured from bookshelves by Bar-code handy
terminal to Data harvesting software and exported to Excel,...and now
we need to add the number 1 to all numbers, as validation digit to our
inventory process.


On Jan 24, 12:10 pm, "Ron de Bruin" wrote:
Hi rodrigovim

You can use the change event for column A in this example
Copy the code in the sheet module and after you enter the ISBN book number in the cell it add the 1

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then
Application.EnableEvents = False
Target.Value = Target.Value & 1
Application.EnableEvents = True
End If
End Sub

--

Regards Ron de Bruinhttp://www.rondebruin.nl/tips.htm



"rodrigovim" wrote in oglegroups.com...
Hi,


How can insert or add a number (always the same e. 1) at right side of
70.000 ISBN book numbers automatically?


Public Librarian Ask to you...- Hide quoted text -- Show quoted text -