Helo friends i need split the one cell data to 4 cells. and two cells with formulas.
hope some one is helping....
Thank you...
Helo friends i need split the one cell data to 4 cells. and two cells with formulas.
hope some one is helping....
Thank you...
Formulae in D, E, O & P are array formulae. Others are ordinary formulae.
Array Formulae are a little different from ordinary formulae in that they MUST be confirmed in the FIRST CELL ONLY by pressing CTRL+SHIFT+ENTER to activate the array, not just ENTER. After that, the array can be dragged down as normal, to cover the desired range.
You will know the array is active when you see curly brackets { } - or "curly braces" for those of you in the USA, or "flower brackets" for those of you in India - appear around the outside of your formula. If you do not use CTRL+SHIFT+ENTER you will (almost always) get an error message or an incorrect answer. Press F2 on that cell and try again.
Don't type the curly brackets yourself - it won't work...
Different shade colour = different formula. happy to explain...
Glenn
None of us get paid for helping you... we do this for fun. So DON'T FORGET to say "Thank You" to all who have freely given some of their time to help YOU
I think, as this is posted in Programming/macro?VBA forum, the solution with code is expected.
So here is my proposition. Sheet1 active and such code run:
![]()
Sub test() Dim i As Long, j As Integer, lr As Long, dimensions Application.DisplayAlerts = False Sheets("Sheet1").Copy After:=Sheets(Sheets.Count) Columns("B:R").EntireColumn.AutoFit Columns("I:M").Insert shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove lr = Cells(Rows.Count, "H").End(xlUp).Row For i = lr - 1 To 3 Step -2 Cells(i, "K") = Val(Mid(Cells(i + 1, "H"), 3)) dimensions = Split(Cells(i, "H"), " x ") For j = 0 To 2 Cells(i, "H").Offset(0, j) = Val(dimensions(j)) Next j Cells(i, "L").Formula = "=H" & i & "*I" & i & "/1000000" 'here your description is misleading Cells(i, "M").Formula = "=SQRT(L" & i & ")" Rows(i + 1).Delete shift:=xlUp Next i Application.DisplayAlerts = False End Sub
Best Regards,
Kaper
Hi Thq Glenn Kennedy
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks