POS SYSTEM FOR SHOPS, GROCERIES AND SERVICE CENTERS FROM EXCEL With Using Barcodes

You need little knowledge about excel macro to do this simply,

Otherwise you can download Old version file from my site here.

OR New Version download here.

First create excel workbook with 6 worksheets for followings like this:

1. Bills
2. Pur
3. Purchase
4. Sales
5. Stock balance
6. Setup

Next:
Create a setup page with this headings and setup your stock items.

Category : item category
Code : Create specific code for your each items. This must be unique ID no for each items and use this to create the barcodes. Exp:

According to this, take all the inventory items & create a code and update sheet with opening stock, pur.price and Seles price. You have to give the correct purchase price and sales prices because when you issue a bill, price will pick from this sheet. Opening balance will link with stock balance sheet.

Bar code create: you can create bar code with your item code, using online barcode creator or you can download barcode software to do it.

Create this sheet with below headings:

Copy this formula to each row and copy paste to down:

Code:  =IF(setup!$B$3:$B$323<>"",setup!$B$3:$B$323,"")
Description:  =IF(setup!$C$3:$C$323<>"",setup!$C$3:$C$323,"")
Opening Balance:   =SUM(IF(B3=setup!$B$3:$B$1021,setup!$D$3:$D$1021))
Purchase: =SUM(IF(B3=purchase!$B$2:$B$2005,purchase!$D$2:$D$2005))
Sales: =SUM(IF(B3=sales!$H$2:$H$2551,sales!$J$2:$J$2551))
Stock: =+D3+E3-F3

Create sheet according to this format and give below formula to each row and create macro with below codes.

Line:  =IF(C5="","",B4+1)
Code: Create a list box link with setup page item code and name. when you connect a bar code reader with bar code sticker details will auto pick.
Description: =I4
Qty : this column you have to enter manually according to customer purchase qty.
Price: =IF(E4="","",VLOOKUP(C4,al,5,0)*E4)

** macro for Save bill
Create a button called Save bill and copy this code: You can download this file form my file.

Sub Dayendsales()
'
' Dayendsales Macro
''
    Sheets("Tsales").Select
    Columns("G:G").Select
    Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
    Range("E2:E255").Select
    Selection.copy
    Range("G2").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Sheets("sales").Select
    Range("B3:D1572").Select
    Application.CutCopyMode = False
    Selection.ClearContents
    Range("D3").Select
End Sub
Sub DayendPurchases()
'
' DayendPurchases Macro
'
    Sheets("Tpurchase").Select
    Columns("F:F").Select
    Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
    Range("D2:D643").Select
    Selection.copy
    Range("F2").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Application.CutCopyMode = False
    Sheets("purchase").Select
    Range("C3:D625").Select
    Selection.ClearContents
    Range("E3").Select
End Sub
Sub SaveBill()
'
' SaveBill Macro
'
    Application.Run "'shop sales control.xls'!copy"
    Application.Run "'shop sales control.xls'!SaleReplace"


End Sub
Sub DayEnd()
'
' DayEnd Macro

End Sub

according to this format.

Now create the Purchase and sales data save page with this format:

Macro code you can copy form my file.

After all the formula and code create you can run the system. When you save the bill, the details will save to sale database and it will update the inventory.

End of the month save the file as new name and delete old data of sale and purchase database worksheet. Before delete, copy the closing stock balances to setup page opening balances column.

You can download Old version file form my blog

or New version form this Link