Posts by tharusha

hi royUK i have added the my VLOOKUP funtion in the sheet with a example can check whether this can be put to a VBA code

hi royUK

I'm trying to do some lookups Automatically in VBA but it doesn't work in this way would you able to tell me how should i write the above function in VBA

HI

i need to apply this VLOOKUP function in VBA Code =IF(ISNA(VLOOKUP(E25,MpanLanka!E:E,2,FALSE)), "No", "Yes") can some one let me know to use this as a VBA code

Thank you royUK

yes thats right

hi royUK can you check weather you can get an idea now .

No keep error #N/A? row and remove every row else

#N/A IS RFER TO AS NH, AS I M USING A VLOOKUP
purpose is to check if all 3 coloums are #N/A is so keep that row

if one coloums or more contain numbers like above remove the row

hy @ royUK hope you got it

Sorry i forgot to mention Code, Code2 ,code3 are column names at least one of the

above column contain a code (number) i want to delete the whole row
out put should be the highlight row

i have a table and their are 3 columns in these 3 columns some cells contain codes
i want to check if at least on of the cell contain the code delete the whole row

hi Carim

i m trying to check if this column named "code" values contain any of the sheets 2,sheet3
if so bring that code to sheet 1 and paste in code1 column

Hi

i have a workbook with 3 sheets call sheet1 ,sheet2 ,sheet3 and all table have a column call "code" and how can i get the "code" column values of sheet2 and sheet3

to sheet 1 "code1" column

can some one help

hi
Because its duplicated

Thanks

hi
im extracting data from 2 sheets and appending into one sheet by considering unique values based on column(commentname)
every time i run the code it should be append the unique value to result sheet according to data1 or data2

can someone help or post on this

can you tell me the code to paste it

hi royUK i did found a solution by getting the last row and getting its value

Thank for the reply

hi royUK
think i have 2 books books with data and i have to check if duplicate available or not based on column "country" id yes need to move to the result sheet both duplicate rows
like wise i have to do to two work sheets and move them to a same workbook same sheet
plz find the attachment

and i need to append the data to result workbook sheet every time i run it
can i help in this

when i try to paste i m getting a error called copy and paste area not the same size can some one take a look[xpost][/xpost]

Option Explicit



Sub MoveDuplicates()

Dim rCl As Range, MyRng As Range, rRng As Range

Set rRng = Sheet1.Range("D:E")

Dim wbFrom As Workbook, wbTo

Dim lDestLastRow

Dim sheet



Set wbFrom = Workbooks("Data.xlsx")

Set wbTo = Workbooks("Appendindata.xlsm").Worksheets("Sheet2")



lDestLastRow = wbTo.Cells(wbTo.Rows.Count, "D").End(xlUp).Offset(1).Row + 1



Set rRng = wbFrom.Sheets(1).Range("A1").CurrentRegion.Columns(2)

If rRng Is Nothing Then GoTo exit_proc

For Each rCl In rRng.Cells

If Application.WorksheetFunction.CountIf(rRng, rCl.Value) > 1 Then

If MyRng Is Nothing Then

Set MyRng = rCl

Else: Set MyRng = Union(MyRng, rCl)

End If

End If

Next rCl

With wbTo



MyRng.EntireRow.Copy _

wbTo.Range("D" & lDestLastRow)

End With

Exit Sub



exit_proc:
End Sub

i want to get the net and total and balances carried through out the sheet
im gonig to add the data from to the sheet up a macro code
onces i add those data i want to do those sum can some one help

can you help me in this also
can i set a range without removing all the blank row because i dont want to remove the last row
Mumps