I'm trying to set up automated posting from journal entries to ledger accounts.
What it boils down to is having XL match account numbers, from a 'Post Reference' column in a journal, with the corresponding ledger accounts (carrying the same respective account numbers) on another worksheet.
Then the transaction from the journal needs to be added to the identified ledger accounts in a sort of 'below-the-last-entry' manner.
This is going to sound very simply to most here I'm sure. I have a need for a simple ledger, credit, debit, balance. I will only have maybe 12 accounts and want to keep track of hand written invoices and payments.
Here's what I would like: I return to my office, click on a tab for an account, enter the date and amount of an invoice in a debit column for that account. When payment is made, enter the amount received in the credit column. Having a running total in the balance column. A monthly statement option would be nice, but not necessary.
I have searched for templates of general ledgers and get results with budgets, projects . . . just too complex for my needs now.
Ref attached sheet
I m facing a big and urgent problem in my worksheet..i have done my all work here but now i knew that there is a difference in this vb code..
I need your urgent favour to rectify it for me..
What i need is sheet1 is my journal jounal (data) and sheet2 is my reporting place where i set a macro button at top to update the report..
But in sheet2 column I i need an auto Balance of debit & credit..
Attached some sample data I am working on Data is ledger printed from SAP R/3 to .pdf using pdf995 Stripped from .pdf to .xls using Able2Extract
Column A represents unit number
Column B represents unit name
Column C I pulled account number from Col E if number otherwise 0
Col D I concatenated Col E,F,G is text color blue, otherwise 0.
I then filled Col D down to replace zero with value above non-zero.
Problem :
There is no account number in C2. I thought about using text in D2 for example and creating a lookup table. The problem with that approach is that exact samy text appears for balance sheet account as ledger account. Salaries& Wages for example is both accnt 216103 (bal sht) and accnt 911000 (ledger activity).
how can transefer data from journal to ledgers accounts,
i can do journal and its formulas, ledger as well,
but i dont know how to connect them to avoid entring data 2 times.
I'm trying to create an aging accounts table from transaction data. I am tracking loans. Here's the layout of the data that I have. Positive entries mean that a new loan was taken out. Negative entries mean that a loan payment was made.: ...
View 10 Replies View RelatedI want to create leger accounts In cashbook there is account head (ex. Hand Loan A/c, Salary A/c, Exam A/c and so on)
View 2 Replies View RelatedI've been working with ledgers to analyze companies financials in detail mostly using pivot tables and charts.
I usually get the data in a format that has the account name and number as a title on top and then each entry for this account under the title. In order to get my pivots working I need to copy the account name and number to each row until the next title.
Here is a picture to understand what I mean: Makrokyssäri.png
So is there a formula or a macro that could avoid doing the copying manually?
I have CASHBOOK Worksheet and I want to create a LEDGER Account in Multiple sheet
View 2 Replies View RelatedFor each account i download there are hundreds of pages of journals and entries, in the header of each page is information such as currency, the entries do not have have the CUR code (ie AUD, USD,CAD etc)
What i need to do is;
1. copy the CUR code to each entry line so that when i sort the data i have the CUR code to each entry
2. Copy the data to a "master" spreadsheet in it's unique tab if Column A begins with N and M.
If I post a logo into a cell of a table, and then later move the table, the cell won't move with it. How do I set it so that the image is locked into the cell of the table? I've tried googling it but all I get are results to set the background of the cell to be the image, which isn't what I want.
View 7 Replies View RelatedSo I'm recording some data to my access database and am wondering why my data will randomly find a place (row to be exact) between existing records in the table. It doesn't always behave this way, but does periodically. I would like my newly added records to be added new, from the bottom of the table every time. What am I missing from my code?
Code:
Sub RecordOrders()
Set iNv = Sheets("vnbinv")
Ir1 = iNv.Cells(Rows.Count, "B").End(xlUp).Row
Set wS = Sheets("1vnb")
Call OpenSessame
With rs
[Code]....
Is there a way to post a specific cell value into a url with macro. here is the macro. I want to Paste the cell value of A1 into the end of the URL. I have also tried to put the desired url in A1 and just reference that.
Range("A2").Select
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;http://finance.yahoo.com/q/ks?s=(A1.value)", Destination:=Range("$A$2"))
.Name = "q?s=Activesheet.name"
.FieldNames = True
.RowNumbers = False
[Code] .......
Adjust this code to output the differences in WS3 instead of WS2. I'm having trouble changing the worksheet in the code.
Ta in advance. Chuf
Sub CompBelowCol()
Dim ListA As Range
Dim ListB As Range
Dim c As Range
WB1 = ActiveWorkbook.Name
WS1 = "EE"
WS2 = "13"
WS3 = "New Order"
Set ListA = Workbooks(WB1).Sheets(WS1).Range("A1:A" & Cells(Rows.Count, "A").End(xlUp).Row)
Set ListB = Workbooks(WB1).Sheets(WS2).Range("M1:M" & Cells(Rows.Count, "M").End(xlUp).Row)
For Each c In ListB
If c.Value "" Then
If Application.CountIf(ListA, c) = 0 Then
With Cells(Cells(Rows.Count, "T").End(xlUp).Row + 1, "T")
.Value = c
End With
End If
End If
Next c
End Sub
I have two spreadsheets, one named Tracker, the second named Data. Data is a central database spreadsheet with account #s and Tracker pulls information from it. A team is assigned an account based on the last two #s of the account #, called term digits.
Goal: A VLOOKUP to where if a column equals the term digit range (example, any accounts ending in 00 to 09), it will pull the account # from Data to Tracker.
That part is easy, the tricky part I'm having issues with is that I need it to do the search mentioned above AND search for account #s that end in 60.
So: search for 00 to 09 and 60, pull the account # from Data to Tracker once found.
Edit: Term Digit is on column B and the account # is on column A - both in the Data spreadsheet
I've got a pretty large budget spreadsheet my department has used for about 5 years now. I want to add multiple totals for different accounts per sheet, however my problem is when I or someone else adds a row at the bottom(above the totals) it is not added into the calculation. I'm using simple formulas right now to total sums and also show remaing money in budget.
For example:
Cell F117 is the total amount spent "=SUM(F112:F116)"
Cell G117 is my budget total, just a number
Cell H117 is the difference "=SUM(G117-F117)"
I’ve thought up a workbook with four sheets named “Employees Summary”, “EMP001”, “EMP002”, “EMP003” and a number of customer account sheets. Customer account sheets are named by their account numbers.
Now for the hard part. I will have three employees. All of us will have to login to the workbook with a username and password. Usernames would be. Administrator, EMP001, EMP002, EMP003. You should be able to change your password at any time.
All sheets will be visible to the administrator. Employees will only be able to see their respective “EMP” sheet and "Employee Summary" sheet. the rest is hidden. And the really hard part Every employee will enter all their transactions for the day into their respective sheets....
I need formula for aging of accounts receivables.
View 7 Replies View RelatedI have a report that I ran that gives me all the customer we have. Unfortunately, my system gives me a separate line item for any thing that my be different within the account like the account has multiple services. I need a way through excel or vba to take these multiple rows of the same acct # and site # and combine it into one line. Each account and site could have multiple services so I would need each consecutive service to be moved to last empty cell of the first such account.
View 11 Replies View RelatedI have a spreadsheet that's full of Accounts Receivable data, ie customer name, invoice number, amount due, etc.
Problem is that there are hundreds of customers mixed together. I'd like to split this spreadsheet into a sheet for each customer so that I can send the individual pages out as statements.
I have the attached worksheet which only changes the image on the last two items.
I can make a selection on the first four and none change, but when I make a selection on 5 or 6 they all work correctly.
Also, how could post the image on sheet1 at A1..A6 instead of Picture database column C?
ozgrid post image or photo.xlsm
I am trying to automatically insert a time into B and a date into A every time something is entered into C. I want the time and date to not change from the time it was posted. What formula will accomplish this?
I tried using if(C"",now(),"") while having Workbook Calculation set to automatic, but it would update every cell in column B every time I entered data into a new cell in column C.
I am trying to print a number of forms with a reference number however when i print i want the number to increase to the next one.
I have used
Sub PrintCopies_ActiveSheet()
Dim CopiesCount As Long
Dim copynumber As Long
CopiesCount = Application.InputBox("How many copies do you want?", Type:=1)
'Now the program wants you to input how many pages you like to print.
[Code] .......
However once i have ran it, save it, and then come back to it later to print again the numbers go back to 1 to 'X',
how do I get it to start from the last number printed?
I'm trying to create a sheet in Excel 2007 that organises shipments, the file is normally pretty large so I want to create a macro which does a few things, so when printed it's easier to work with. First one is to make a gap when items change in Column B and Column F, I can use the below code to make the gaps for one column but not both without making a separate macro. Is there a way to make the gaps on changes in columns B & F on one macro? (I have an example nearer the end)
Dim Rng As Range
Dim x As Long
Set Rng = Range("F12:F" & Range("F65536").End(xlUp).Row)
For x = Rng.Rows.Count To 2 Step -1
If Rng.Cells(x, 1).Offset(-1, 0).Value Rng.Cells(x, 1).Value Then
Rng.Cells(x, 1).EntireRow.Insert Shift:=x1Down
Rng.Cells(x, 1).EntireRow.Insert Shift:=x1Down
End If
Next x
After the data is separated I wanted to insert totals of the weights when there is a spacing, and a counter which stops after each spacing and restarts when the next items start.
Here is an example of the data I have before the Macro with Columns.
Column B
Column C
Column F
Column I
Destination of order
booking ref
Size
weight of orders
[Code] ........
This is how I would like the date to look like after the macro.
Column B
Column C
Column F
Column I
Count
Destination of order
booking ref
Size
weight of orders
[Code] ..........
I'm looking to count the number of customer accounts in a report based on the branch number. I generally need to know, how many accounts has been opened per each branch without double counting the same account number (as it happens that the report may have duplicate number.
finally I need to know the sub total showing the total per branch and subtotal of all branches together.
following calculation that someone created for me.
=LOOKUP(10^10,CHOOSE({1,2},0,AVERAGE(IF(Sheet1!$C2:$C13=$A2,IF(Sheet1!$B2:$B13-DAY(Sheet1!$B2:$B13)+1=B$1,Sheet1!$D2:$D13)))))
My problem is that I have some customer account numbers that are alpha/numeric (1B0012) and some that are just numeric (1675) . The above formula does not pick up the numeric accounts correctly.
Is there something that I need to add/remove from this formula so that it will pick up both? or is it a format issue?
I have attached an example of the spreadsheet with this problem. If you select either of the alpha numeric codes it works, but if you select the numeric code it doesn't.
I'm trying to find customer loyalty by rep. So I need to find all the accounts that have a loyal relationship with a rep and separate them. All the other reps that sold to those companies are removed. Then I need to find the accounts that still did business with us from year to year, but not with the same rep. Any not loyal accounts are also removed.
The ultimate goal is a pivot table that shows reps on the vertical axis, years on the horizontal axis, with the data being total number of accounts per rep per year. All of the 2008 accounts will be counted, and of the 2009 accounts, only those that were loyal - retained either by the same or a different rep - will be totaled. For this purpose there is no difference between accounts retained either by the same or a different rep, they will be added together. So a rep may have had 10 accounts they sold to in 2008, and of those 10, 5 bought again in 2009, and the rep also picked up 1 account that bought from another rep in 2008. So the rep's totals would be 10 for 2008, and 6 for 2009. I've attached an example workbook to show you what I mean. A "1" in the 2008 or 2009 column indicates the account bought something that year.
I run reports from Accounting systems that reflect different periods. Of course each period ends up having more or less accounts. See the attached file. This is just one little sample of big massive reports. I need to line up accounts across each Quarter. so that i can calculate differences between each quarter.
In the past few times, I have done this manually. There has got to be a way to do this quicker. I have tried Pivot table. but pivot table didn't help either (unless i was not doing it right).
I have a workbook where i am trying to find duplicate accounts. I need to get a count of these duplicate accounts and i need to find the accounts as well. One last thing the workbook covers an entire year and i would like a formula that will cover the 12 sheets to provide the results.
View 4 Replies View RelatedI have this table listed below that I want to automatically populate the score cell when i enter a new Cost of Poor Quality price. I have a lookup function to decide what score should be placed =LOOKUP(A2,{0,1001,5001,10001},{4,3,2,0}). I just don't know how to make the table dynamic to account for new entries while keeping the Lookup function working. T
Cost of poor Quality
Score
$1,000
4
$50,000
0
[Code] ............