Posts by pradeep_atm

Re: $20 for Excel VBA help to automate manual task

HI, I did not see any response from KJB. Can anyone look into this issue.

Re: $20 for Excel VBA help to automate manual task

Hi KJB, I am still waiting for your response. Please let me know the status.

Re: $20 for Excel VBA help to automate manual task

HI KJB, Any update?

Quote from S M C;789291

KJB, all yours. I was just informing the OP about the payment.

Re: $20 for Excel VBA help to automate manual task

HI KjBox,
I am looking for a solution sooner (6-8 hrs ?).

Thanks,
PA

Re: $20 for Excel VBA help to automate manual task

HI SMC,
Transaction reference # 99251274HM2466412.

Will you be able to look into my requirement?

thanks,
PA

HI experts,
I need help in automating a manual task to arrive at profit/loss for transactions using FIFO method. Attached file has a sample and describe the expected outcome. I need this today (next couple of hours).

Appreciate your help.

thanks,
PA

Hello Experts,
Wondering if you could help in coming up with an Excel function to determine the FIFO (First in First Out) price of stocks based on consumption.

Stock ID (string) is uniquely identified for any transaction.

For example:
Sales:
Stock Date Qty Selling Price Cost Price (Excel Custom Function to determine the Cost or VBA code to look for the cost?) Selling Price
Stock 1 20-Nov-16 70 $ 110 ?? ----Answer based on FIFO: $70 $40
Stock 1 21-Nov-16 40 $ 100 ??-----Answer based on FIFO: $70 $30

Purchases:
Stock PurchaseDate Qty Cost Price Remaining Stock
Stock 1 01-Nov-16 120 $ 70 ??
Stock 1 02-Nov-16 100 $ 80 ??

Greatly, appreciate your help.

Thanks,
Pradeep

Re: FIFO calculation

Hi Ramesh,
Did you manage to find the solution to your issue? I am also looking for a solution for a similar requirement.

Thanks,
Pradeep

Re: Send Each Row Every Day On A Specified Time

Hi Daniel,

Sorry for the delayed reply.

Thanks for taking time to reply to my post.

I am using Microsoft Excel 2003. The option is already checked and when I have added the lines of code you mentioned it gave the compile error: "User-defined type not defined".

Am I missing anything else..?

Re: Send Each Row Every Day On A Specified Time

Hi experts,

Could someone help me in this?

Thanks for your time.

Re: Send Each Row Every Day On A Specified Time

Hi Dave,

You got it right.!
I just copied those lines of code from the link which you have mentioned and it's been some couple of years since I have looked at some vb code.

But, still the old problem remains, where if I replace 'Display' with 'Send', run time error is shown up.

Thanks for your time.

HI VBA Noob,
Thanks for your reply. I have used the correct macro name.

Re: Send Each Row Every Day On A Specified Time

Thanks for your reply Dave.

Application.OnTime
  TimeValue ("02:00:00"), "My Macro"

I have added the above lines of code in my macro and the Compiler error shows 'Argument not optional'.

Below line of code in the Workbook open event

Application.OnTime TimeValue("02:00:00"), "My Macro"

Kindly suggest where I am going wrong.

Thanks in advance.

HI Experts,

I have a small requirement.

I want send the each row every day on a specified time. For instance, I will send row1, today at 2.00 AM and row2 tomorrow at 2.00 AM and row the subsequent day day at 2.00 AM etc.,

Option Explicit


Sub Send_Files()
    Dim OutApp As Object
    Dim OutMail As Object
    Dim sh As Worksheet
    Dim cell As Range, FileCell As Range, rng As Range


    With Application
        .EnableEvents = False
        .ScreenUpdating = False
    End With


    Set sh = Sheets("words")


    Set OutApp = CreateObject("Outlook.Application")
    OutApp.Session.Logon


    For Each cell In sh.Columns("G").Cells.SpecialCells(xlCellTypeConstants)


        'Enter the file names in the C:Z column in each row


        If cell.Value Like "?*@?*.?*" Then
            Set OutMail = OutApp.CreateItem(0)


            With OutMail
                .To = cell.Value
                .Subject = "Testing" & cell.Offset(0, -5).Value
                .Body = cell.Offset(0, -5).Value & "(" & cell.Offset(0, -4).Value & ") = " & cell.Offset(0, -3).Value & vbNewLine & vbNewLine & "test1 " & cell.Offset(0, -2).Value & vbNewLine & vbNewLine & "test2 " & cell.Offset(0, -1).Value
                .DeferredDeliveryTime = cell.Offset(0, 2).Value & " 02:00"
	    .send	
            End With


            Set OutMail = Nothing
        End If
    Next cell


    Set OutApp = Nothing
    With Application
        .EnableEvents = True
        .ScreenUpdating = True
    End With
End Sub

When I tried this code, it is giving Run time error message "Outlook does not recognize one or more names". I am not sure what am I missing here. Instead, if I use .Display in place of .Send it is composing the mail with correct values (including the delivery time).

Also is it possible that, every day mail is sent automatically, instead of I running the Vb code manually...?!

Thanks in advance.

Hi Excel Gurus,

Is it possible to build a formula to get the last friday date of every month? Last Friday of every month is the period close for us in financial perspective and so is the need.

Hope the issue is clear enough.

Thanks in advance.

Re: Negative values and leading zeros

Hi Seti,

Thanks. Your formula is working fine.

Can't we make the code which you have given to refer to the selection instead of Column 'A', as it is in your current code.

Sorry, lost touch with excel..it's been a long time...

Thanks.

Re: Vb Project Run Time Error

Hi Dear Jack,

You are right..! But I had no choice.

Can you please help me in this.

Regards,
Pradeep

Hi Excel guru's,

I am stuck...really stuck. Your help will be greately appreciated.

Issue:
One excel file which I have been using since long time in my company, has some macros built into it. Suddenly it started giving this error...and to my dismay I found that the VB project is also protected. It was created by some company employee who is no more with the companyt.

Any of you kindly unprotect this project and help in resolving the bug....

Please help me..as I need to deliver the drawing very urgently....Plsss help.

Given the size of the file am not able to upload the same here. If you any of you interested in looking into this, I can forward the file to your personal email.

Any help will be greately appreciated....

Thanks in advance...

Warm Regards,
Pradeep

Re: sheet reference in formulas

Ummm.. refering a sheet by other than the Sheet name, I don't think it's possible..

Well, what do you want to achieve, by this, prolly some altenatives can be suggested..

HTH.

Re: Finding the value of the last populated cell in a defined column

Hi Kris,

It's a good one. Can you explain these as well.

How did you manage to get these so easily..

Thanx

Re: Text Boxes

Hi,

Try MultiLine option set to True, in the properties of the Textbox.

HTH.