Hi,
Try below codes,
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count 1 Or Target.Column 2 Then Exit Sub
If Target.Value = Opening Stock Then
Target.Offset(0, 3) = =VLOOKUP(RC[-1],'Closing St n Utlzn-Apr
2012'!R2C1:R65C3,3,FALSE)
Else
Target.Offset(0, 3) =
End If
End
Hi,
Try below codes,
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.ScreenUpdating = False
With Worksheets(1).PageSetup
.LeftMargin = Application.InchesToPoints(0.05)
.RightMargin = Application.InchesToPoints(0.05)
.TopMargin =
Alright now makes meanin. Thanks Sam
Sent from my BlackBerry® smartphone from Airtel Ghana
-Original Message-
From: Sam Mathai Chacko samde...@gmail.com
Sender: excel-macros@googlegroups.com
Date: Tue, 8 May 2012 13:00:14
To: excel-macros@googlegroups.com
Reply-To:
Thanks Ross
Sent from my BlackBerry® smartphone from Airtel Ghana
-Original Message-
From: Asa Rossoff a...@lovetour.info
Sender: excel-macros@googlegroups.com
Date: Tue, 8 May 2012 16:33:57
To: excel-macros@googlegroups.com
Reply-To: excel-macros@googlegroups.com
Subject: RE:
hi,
i tried the code provided by the group in the sheet attached. i am getting
error message subscript out of range.
Refreshing the problem again: tracker to update the off days as per
employee's choice with not more than 8 employees on off on a particular day
and the employee cannot have
Hi,
Below mentioned code is not working. Even if I select Opening Stock,
Purchase or Issue option qty is same.
On Wed, May 9, 2012 at 11:44 AM, Maries talk2mar...@gmail.com wrote:
Hi,
Try below codes,
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count 1 Or
I think MACRO IS NOT ENABLED. When you open file, Security warning show
under Ribbon. Click options == Select Enable this content == Press ok.
Try now...
On Wed, May 9, 2012 at 11:57 AM, Smitha S R sperdwo...@gmail.com wrote:
Hi,
Below mentioned code is not working. Even if I select Opening
Hello
New updates to the Microsoft Office 2003 is now available from Microsoft.
This is for your information only.
--
Thanks
Ashish Pradhan
--
FORUM RULES (986+ members already BANNED for violation)
1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
Urgent, Need
Hai Anil,
Thanks for resolving the query and thanks for advising me about the user
form.
Once again thank a lot experts.
Regards
Lokesh.M
On Wed, May 9, 2012 at 2:42 PM, Anil Gawli gawlianil8...@gmail.com wrote:
Attached is the workbook and go to Calculation worksheet.
On Wed, May 9,
Thanks alot
On Wed, May 9, 2012 at 3:25 PM, Maries talk2mar...@gmail.com wrote:
I think MACRO IS NOT ENABLED. When you open file, Security warning show
under Ribbon. Click options == Select Enable this content == Press ok.
Try now...
On Wed, May 9, 2012 at 11:57 AM, Smitha S R
Hi Smitha,
Maries solution is nice..
Apart of this you can also use below formula without using Macros.
Put formula in Range(E2)
*=IF($B2=Opening Stock,INDEX('Closing St n Utlzn-Apr
2012'!$C$2:$C$65,MATCH(D2,'Closing St n Utlzn-Apr 2012'!$A$2:$A$65,0)),)*
--
Thanks regards,
Noorain Ansari
Verma bhayya,,
The code is working fine but only one sided.i mean if there are no Receipts
in List 2 which are in List 1 then the code finds the difference only
between these two.how to change the code so that it shows all the missing
receipts with amounts either way...Receipts with amounts not
I was try this but unable to do particular format like my sheet attached in
last mail.
From: NOORAIN ANSARI noorain.ans...@gmail.com
To: excel-macros@googlegroups.com
Sent: Wednesday, May 9, 2012 5:13 PM
Subject: Re: $$Excel-Macros$$ How to create pivot
Hi All,
I'm new to macros so I'd like to ask you for advice. Can you look at code below
and help me to improve. What I'd like to do is make changes to BOLDED line
(Windows(LowRisk EPlan SAUCE week 19.xls).Activate) in order to activeted
open file (in this case file is called LowRisk EPlan
Are you talking about fitting when viewing or printing.
Don Guillett
Microsoft MVP Excel
SalesAid Software
dguille...@gmail.com
From: Mohammed Muneer
Sent: Tuesday, May 08, 2012 11:32 PM
To: excel-macros@googlegroups.com
Subject: RE: $$Excel-Macros$$ Table data fit the page size..(auto)
HI Rajan,
Can you please help me on this Issue
Regards,
Pavan Kumar G
On 5/8/12, pavan Kumar pavanshr...@gmail.com wrote:
Hi Rajan,
Can you please help me on this...
Regards,
Pavan Kumar G
On 5/8/12, pavan Kumar pavanshr...@gmail.com wrote:
Hi Rajan,
Thanks for your reply, its working
Nice work.. not seems that it's your first program J
Regards
Rajan verma
+91 7838100659 [IM-Gtalk]
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
On Behalf Of hilary lomotey
Sent: 08 May 2012 1:40
To: excel-macros@googlegroups.com
Subject: Re:
Please share your sample sheet.. Thanks
On Tue, May 8, 2012 at 8:59 AM, rohit patel rohit81438...@gmail.com wrote:
On Thu, Apr 16, 2009 at 10:46 AM, rohit patel rohit81438...@gmail.comwrote:
i just want to link dis 1 sheet (Vendor April .09 demo) to Receiving
status(supplier)mar.09 demo,
You can use this Code :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 5 Then
Target.CurrentRegion.Offset(1).Sort
Key1:=Target.CurrentRegion.Offset(1).Cells(1,
Target.CurrentRegion.Offset(1).Columns.Count)
End If
End Sub
Regards
Rajan verma
Would the value in Cells always have same characters, I means would it
always contain 3 Underscore Signs??
Regards
Rajan verma
+91 7838100659 [IM-Gtalk]
-Original Message-
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
On Behalf Of pavan Kumar
Sent: 08 May
Try this :
Sub Highlight()
Dim VarArr1
Dim VarArr2
Dim lngLoopCount As Long
Dim lngArrLoop As Long
Dim rngDataRange As Range
Set rngDataRange = Range(rngRange)
For lngLoopCount = 1 To rngDataRange.CurrentRegion.Rows.Count Step 2
VarArr1 =
Hi Keechak
Try this: See the attached File
Sub ShowDifferenc()
Dim ArrTabel1
Dim rngTabel2 As Range
Dim ArrResult()
Dim lngRecordCOunter As Long
Dim lngFillArrayAs Long
lngFillArray = 1
ArrTabel1 = Range(rngTable1).CurrentRegion
Set
Ya, u r right.
Regards,
Muneer,
CC.
Are you talking about fitting when viewing or printing.
Don Guillett
Microsoft MVP Excel
SalesAid Software
dguille...@gmail.com
From: Mohammed Muneer mailto:mmun...@ccc.com.qa
Sent: Tuesday, May 08, 2012 11:32 PM
To:
Hi Experts,
I have one small query i need a macro or else formula for running text in
excel.
Please help on us and do the needful.
Regards
Lokesh.M
--
FORUM RULES (986+ members already BANNED for violation)
1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
You can try this :
Sub sauce_data_FRI_AMPM()
Dim wbkNew As Workbook
Set wbkNew = Workbooks.Open(Filename:=R:\Planning\Sauce Plan - New.xls,
ReadOnly:=True)
wbkNew.Worksheets(SaucePlan).Range(E6:H101).Copy Workbooks(LowRisk
EPlan SAUCE week 19.xls).Worksheets(YourSheetName).Range(W6)
You must learn this by Recording macro . Put all sheets in a Loop and Give
Pivot Destination according to your requirement.
Regards
Rajan verma
+91 7838100659 [IM-Gtalk]
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
On Behalf Of LAKSHMAN PRASAD
Sent: 09
Follow this Link
http://www.excelvbamacros.com/2012/04/adding-marquee-on-excel-worksheet.html
Regards
Rajan verma
+91 7838100659 [IM-Gtalk]
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
On Behalf Of Lokesh Loki
Sent: 09 May 2012 7:33
To:
*Thank you so much *Don Guillett. very thanks.
Thanks Regards,*
*
*Deba Ranjan P***
On Wed, May 9, 2012 at 7:41 PM, dguillett1 dguille...@gmail.com wrote:
Modified graph . You can make other changes to graph
Don Guillett
Microsoft MVP Excel
SalesAid Software
dguille...@gmail.com
Hi Rajan,
I did not get any results in the below link, could you please provide me
the solution with the attached excel sheet.
Its great for me to understand.
Regards
Lokesh.M
On Wed, May 9, 2012 at 7:50 PM, Rajan_Verma rajanverma1...@gmail.comwrote:
** **
Follow this Link
*
Hi Loki
Please try below..code try to edit.. how you want...
---(code is From Rajan verma)
Declare Sub Sleep Lib kernel32 (ByVal dwMilliseconds As Long)
Sub Start()
Dim St As String
Dim Cell As Range
Set Cell = Range(L5)
St = Cell.Value
St = Trim(St)
St = St
WHICH???
Don Guillett
Microsoft MVP Excel
SalesAid Software
dguille...@gmail.com
From: Mohammed Muneer
Sent: Wednesday, May 09, 2012 8:52 AM
To: excel-macros@googlegroups.com
Subject: RE: $$Excel-Macros$$ Table data fit the page size..(auto)
Ya, u r right.
Regards,
Muneer,
CC…..
HI Rajan,
It will not be same.
Regards,
Pavan Kumar G
On 5/9/12, Rajan_Verma rajanverma1...@gmail.com wrote:
Would the value in Cells always have same characters, I means would it
always contain 3 Underscore Signs??
Regards
Rajan verma
+91 7838100659 [IM-Gtalk]
-Original
Dear Pankaj,
Please check below link,hope it will help to you.
http://www.mrexcel.com/tip103.shtml
https://office.microsoft.com/en-us/excel-help/get-and-analyze-data-from-the-
web-in-excel-HA001054848.aspx
http://www.techrepublic.com/article/pull-data-into-microsoft-excel-with-web
Dear Lokesh,
Please see attached sheet.
--
Thanks regards,
Noorain Ansari
www.noorainansari.com
www.excelmacroworld.blogspot.com
On Wed, May 9, 2012 at 8:00 PM, Lokesh Loki lokeshsmg2...@gmail.com wrote:
Hi Rajan,
I did not get any results in the below link, could you please provide me
Dear Noorain,
Thanks for the help, but i want to creat a web page which can update from
Excel data, not Excel to be updated by Web page. kindly help into that pls
Regards
Pankaj k Pandey
On Wed, May 9, 2012 at 8:37 PM, NOORAIN ANSARI noorain.ans...@gmail.comwrote:
Dear Pankaj,
Please check
2012/5/9 Lokesh Loki lokeshsmg2...@gmail.com
Hai Anil,
Thanks for resolving the query and thanks for advising me about the user
form.
Once again thank a lot experts.
Regards
Lokesh.M
On Wed, May 9, 2012 at 2:42 PM, Anil Gawli gawlianil8...@gmail.comwrote:
Attached is the workbook and
pls help with this-- can you put in the formula?
On Mon, May 7, 2012 at 12:09 AM, Sara Lee lee.sar...@gmail.com wrote:
--
*col i *in Sheet 2 needs to be filled up
by looking up *col h *in sheet 2 in sheet 1 *col c* value- either exact
or next closest- i.e for every value in col
Hello Bé Trần,
I believe that is what Lokesh meant (sheet1 = data entry form; sheet2 =
database record storage) -- but I am replying just to provide the suggestion
that you type your replies at the top of messages -- I often have difficulty
finding your comments, since they are buried down
Hi Shekhar,
Well, the prupose of the formula is, in the end, to lookup a text value
based on an input value. This is best accomplished with a lookup function.
ANY of the lookup functions could be used - LOOKUP, HLOOKUP, VLOOKUP,
CHOOSE, INDEX, etc.
Here is a version that utilizes
Hello, I'm confused about that response. I don't know how SUMPRODUCT would
help here. Could you explain a bit?
Thanks
On Tuesday, May 1, 2012 8:42:57 AM UTC-4, Don Guillett wrote:
IF(SUMPRODUCT((B8:AE81)*B8:AE8)1,down,up)
Don Guillett
Microsoft MVP Excel
SalesAid Software
I don’t recall why?? I gave that answer. Can you give more detail with examples
and the logic of what you want.
Don Guillett
Microsoft MVP Excel
SalesAid Software
dguille...@gmail.com
From: Filip Houdek
Sent: Wednesday, May 09, 2012 5:05 PM
To: excel-macros@googlegroups.com
Subject: Re:
Hi
PFA the stock statement where I need help in the Dashboard. If I select,
the item I need the relevant closing stock in the next cell.
My formula is not working. Please help.
Thanks
Smitha
--
FORUM RULES (986+ members already BANNED for violation)
1) Use concise, accurate thread titles.
Hi Smitha,
Please try it..
=INDEX('Stock n cnsmpn-May 2012'!$E:$E,MATCH(Dashboard!C2,'Stock n
cnsmpn-May 2012'!$A:$A,0))
and see attached sheet.
--
Thanks regards,
Noorain Ansari
www.noorainansari.com
www.excelmacroworld.blogspot.com
On Thu, May 10, 2012 at 7:13 AM, Smitha S R
Hi,
You will need to set up two records for each Company. The first Needs to be
the smallest shipment and the next needs to be the largest shipment. Your
chart will looks something like the below option
NEW ENGLAND RETAIL INC. 02072 0 NEW ENGLAND RETAIL INC. 02072 20 INTERSTATE
MOVING
Hi Smitha,
Please try this too, its good working. below!!
*
=IF(R[-4]C=,,VLOOKUP(R[-4]C,'Stock n cnsmpn-May 2012'!C[-2]:C[2],5,0))
*
Thanks Regards,*
*
*Deba Ranjan P***
On Thu, May 10, 2012 at 7:54 AM, NOORAIN ANSARI noorain.ans...@gmail.comwrote:
Hi Smitha,
Please try it..
45 matches
Mail list logo