Dear Kaiser,
Please try the below code..
Sub CopyAboveRow()
Dim sRng As Range
Dim iRow As Integer
Dim iCol As Integer
Set sRng = Range("A2:F5")
Range("A2").Select
For iRow = 2 To 5
For iCol = 1 To 5
If Cells(iRow, iCol).Value = "Do" Then...
Of course deepak, i will share definately...
The main problem is in my SQL statement which i written to fetch details from other workbook (vendor_Db).
Intial code :strSQL = "SELECT * FROM [Vend_DB_SJP$Table1] WHERE Vendor_Code = " & VCd & ";"
Modified Code: strSQL = "SELECT * FROM...
Hi..all
I am working on a project for my users who can create purchase orders by their own. Below is my quick summary of my project.
PO Application tool, in which i am using ADODB connection to fetch details from another excel workbook which is situated at my desktop. I have created some user...
Dear Naryank,
I tried your code, but it works for me.. might be i am doing something wrong. Please have a look on my below code
Private Sub cmd_NewCancel_Click()
New_or_Cancel = True
New_or_Cancel = New_or_Cancel Xor True
If New_or_Cancel Then
cmd_Close.Enabled = False...
Hi..all
I am unable to achieve my purpose. I have tried above code (Hui's code), but i can't able to achieve. What i required is.. when cmd_NewCancel button will click the caption should be changed to cancel and if the user click cancel button, all the fields should be reset.
I can able to...
Hi..all
I am working on a project, in which i create a button for New & Cancel option. I did on form activate, the button caption will be "New". When that new button will click, the new caption will change to cancel.
But now i want, whenever this button again click that means for cancel...
Dear Akash
I tried above procedure (text to columns) in your excel file.. it works correctly.. please check it again.
And if you applied same procedure, but still shows data as it is, please select the cell one by one and press F2 key. Is the cell values getting changed or not ??
Dear Pallu
Please confirm the below flow
EMP Code need to be searched in Master sheet. If found, then as per the header title (Column Name), master data should be updated. If not found, a record need to be add in the master sheet along with the details.
Is this flow right...???
I created two variables. Cell as range & EmailAddrRng as range. Please change the code as below.
Set EmailAddrRng = Range("N11:N" & Range("N11").End(xlDown).Row)
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)
On Error Resume Next...
Dear Karthik...
In your code, intially you are joining all the mail ids into one line, so that you can able to send mail to group. But if you want to send it one by one, then you need not to join the strings. Just put loop on that range, so that it create mail item one by one...
Please try...
Dear ajs432
I would suggest Chandoo's online VBA Classes because i already take training on that. Intially, i dont' have any knowledge in VBA (zero level) but now i can able to write my own VBA program and automate my job process. Chandoo's explanation about VBA concepts & their use and...
Dear Nadir...
One question is that... Are you getting sheets from your analysts as an attachments ?? As per my idea... you have two options
1. If you have workbooks, which has been sent by your analyst, and you have the master file and you want to add the details from that workbooks to in your...
Dear Narayanak sir
As per James question, he wants a symbol to be appeared by pressing the particular key board sequence. So as per your formula, it will show the desired symbol by providing word (A1). So this will one type of helper column to get the symbol.. am i right ??
I want to know...
Thank you so much for giving your valuable time to explain the process... Now this will help others (if they have same problem) to resolve their problem..
Once again.. Thank you so much
Dear Pallu..
Your question not so clear... as per question, if you want to update the input sheet details same as in master sheet .. then u can link all the cells with master file... by putting = along with refer cell like =INPUT$A$1
or you want some different.. then please try to elaborate...
I would like to request to all the Excel Ninjas or experts that if you are going to solve any question with complex formulas, then please try to give a short bit of explanation that how the formula(s) will work.
This will improve the knowledgability of the member and other members can do the...
Dear Amit,
If there isn't any calculation or formulas in that cell, then you can replace that blank space. You can use find and replace dialogue box to replace this error.
If any formula is there, in that cell, then please use IFERROR formula (for 2007 and above) to replace the error values...