I want to use if condition for below data if column "a" matches with column "i" and column "c" matches with column "j" then the result of column "k" should get reflected in column "e"
Posts by sachin483
-
-
Re: Transposing month wise data
yes i have tried the alternative solution but the result remain the same ie:- 3 column of sheet1 gets transposed
-
Re: Transposing month wise data
thanks for alternative solution but no of column keeping changing in my worksheet depending on the work so how can i keep control on them in this worksheet there 3 column in sheet1 but in other worksheet there are 6 columns so which part has to be modified
-
Re: Transposing month wise data
thanks a lot it working fine but no of column keeping changing in my worksheet depending on the work so how can i keep control on them in this worksheet there 3 column but in other worksheet there are 6 columns so which part has to be modified
-
Re: Transposing month wise data
i have attached the code for 3 month recording a macro
Code
Display MoreSub Macro1() ' ' Macro1 Macro ' ' Keyboard Shortcut: Ctrl+Shift+Q ' Range("A1:C1").Select Range(Selection, Selection.End(xlDown)).Select Selection.Copy ActiveSheet.Next.Select ActiveSheet.Paste Application.CutCopyMode = False Range("D1").Select With Selection.Interior .Pattern = xlSolid .PatternColorIndex = xlAutomatic .ColorIndex = 54 .TintAndShade = 0 .PatternTintAndShade = 0 End With With Selection .HorizontalAlignment = xlLeft .VerticalAlignment = xlBottom .WrapText = False .Orientation = 0 .AddIndent = False .IndentLevel = 0 .ShrinkToFit = False .ReadingOrder = xlContext .MergeCells = False End With ActiveCell.FormulaR1C1 = "VALUE" Columns("A:A").Select Selection.Insert Shift:=xlToRight Range("A1").Select ActiveCell.FormulaR1C1 = "MONTH" Range("A1").Select ActiveSheet.Previous.Select Range("D1").Select Selection.Copy ActiveSheet.Next.Select Range("A2:A9").Select ActiveSheet.Paste Application.CutCopyMode = False Range("A2").Select ActiveSheet.Previous.Select Range("D2").Select Range(Selection, Selection.End(xlDown)).Select Selection.Copy ActiveSheet.Next.Select Range("E2").Select ActiveSheet.Paste Application.CutCopyMode = False ActiveSheet.Previous.Select Range("E1").Select Selection.Copy ActiveSheet.Next.Select Range("A3").Select Selection.End(xlDown).Select Range("A10").Select ActiveSheet.Paste Application.CutCopyMode = False Range("B7").Select Selection.End(xlUp).Select Range("B2").Select Range(Selection, Selection.End(xlDown)).Select Range("B2:D9").Select Selection.Copy Range("B10").Select ActiveSheet.Paste Range("B18").Select ActiveSheet.Paste Application.CutCopyMode = False Range("A10").Select Selection.Copy Range("A11:A17").Select ActiveSheet.Paste Application.CutCopyMode = False Range("A12").Select Selection.End(xlDown).Select ActiveSheet.Previous.Select Range("F1").Select Selection.Copy ActiveSheet.Next.Select Range("A18").Select ActiveSheet.Paste Application.CutCopyMode = False Selection.Copy Range("A19:A25").Select ActiveSheet.Paste Application.CutCopyMode = False Range("E18").Select Selection.End(xlUp).Select Range("E10").Select ActiveSheet.Previous.Select Range("E2").Select Range(Selection, Selection.End(xlDown)).Select Selection.Copy ActiveSheet.Next.Select ActiveSheet.Paste Application.CutCopyMode = False ActiveSheet.Previous.Select Range("F2").Select Range(Selection, Selection.End(xlDown)).Select Selection.Copy ActiveSheet.Next.Select Range("E11").Select Selection.End(xlDown).Select Range("E18").Select ActiveSheet.Paste Application.CutCopyMode = False End Sub
-
I have this data in sheet1 with this type of formatting i want to transpose the same as per sheet2 can it be done through macro or formula in excel
-
Re: In between range amount
thanks a lot
-
Request for formula for attached worksheet for this criteria if column "h" matches with column "a" and column "i" is in between column "b" and "c" the column "d" amount should get reflected in column "k"
-
I want to restrict user from copy / cut / paste / save / save as - excel workbook he can only view the worksheet only. Can it be done through a macro and after opening the file should not be save in temp folder also
-
Re: split word document
Thanks for macro but i have formatted the word file with landscape mode it is coming portrait and can the file name be the criteria based on line of 3 or 4 and i have kept the minimum margin for the word document, so the margin can also be fixed which was kept for original document
-
i have word document of 700 pages that i want split based on page number ie:- after every 4 pages it should split and save as new file and the file name must be the criteria of page 1
-
how to calculate service format from the data in below format up to current date
[TABLE="class: grid, width: 500"]
[tr][td]DATE
[/td][td]Year of service
[/td][/tr][tr][td]14-05-2007
[/td][td]8 years, 0 months, 13 days
[/td][/tr][tr][td]31-08-2009
[/td][td]5 years, 8 months, 26 days
[/td][/tr][tr][td]13-11-2006
[/td][td]8 years, 6 months, 14 days
[/td][/tr]
[/TABLE] -
i have 24 columns for 1 item , one is for qty and another is for value , how can sum up qty and value for a year at the end with reference to row header
-
-
-
-
-
With reference to this post http://www.ozgrid.com/forum/showthread.php?t=194840
How to put particular range for subtotal and put the color for subtotal ie:- i have COLUMN (AO) to COLUMN (BF) for subtotal and my worksheet has a header so the calculation should start from row number 3
-
Re: Sum rows directly below the current row until blank with VBA
thanks for the code
CodeSub test() Dim r As Range For Each r In Columns(1).SpecialCells(2, 1).Areas r(0).Formula = "=subtotal(9," & r.Address & ")" Next End Sub
How to put particular range for subtotal and put the color for subtotal ie:- i have COLUMN (AO) to COLUMN (BF) for subtotal and my worksheet has a header so the calulation should start from row number 3
-
Re: convert xlsx to dbf through macro
error is
invalid outside procedureinputFile = WScript.Arguments.Item(0)