excel - if single cell value is found in a range then delete entire row -


i working daily data recorded 31 days of data per multiple stations , need vba code remove leap year days. have list of dates of data recorded , list of years not leap years want delete. delete 30 , 31 days, used basic following code:

dim lastrow, long

lastrow = activesheet.cells(65536, 1).end(xlup).row

for = 1 lastrow     'delete 31st days february     if activesheet.range("d" & i) = 2 , activesheet.range("e" & i) = 31         rows(i).select         selection.delete shift:=xlup     end if next

pretty simple , works nicely hoping able similar find non-existent date (ie. 02/29/non-leapyear) within data , delete row has turned out extremely difficult match value within range. thinking along lines of this:

dim lastrow, long, leapyear workbook

set leapyear = workbooks("leapyears.xlsx")

lastrow = activesheet.cells(65536, 1).end(xlup).row

for = 1 lastrow     'obviously have problem trying match cell range     if activesheet.range("d" & i) = leapyear.sheets(1)range("c2:c90")         rows(i).select         selection.delete shift:=xlup     end if next

any or way handle appreciated!

modified version of answer this question

sub sample()  dim startingscreenupdatevalue boolean dim startingeventsvalue boolean dim startingcalculations xlcalculation  application     startingscreenupdatevalue = .screenupdating     startingeventsvalue = .enableevents     startingcalculations = .calculation     .screenupdating = false     .enableevents = false     .calculation = xlcalculationmanual end   dim vartestvalues variant  vartestvalues = workbooks("leapyears.xlsx").sheets(1).range("c2:c90")  rows(1).insert [a1].formular1c1 = "tempheader1" [a1].autofill destination:=range("a1:h1"), type:=xlfilldefault  range("d1").autofilter field:=4, criteria1:=application.transpose(vartestvalues), operator:=xlfiltervalues  range("d2", range("d" & rows.count).end(xlup)) _     .specialcells(xlcelltypevisible).entirerow.delete  activesheet.autofiltermode = false rows(1).delete   application     .screenupdating = startingscreenupdatevalue     .enableevents = startingeventsvalue     .calculation = startingcalculations end  end sub

note: code runs assuming data has headers if not please advise.

remember run code on copy of data , not actual data until confident working 100%.


Comments

Post a Comment

Popular posts from this blog

c++ - CryptStringToBinary API behavior -

i seeing strange behavior cryptstringtobinary cryptography api. please see below code (config: x64 debug): #include "stdafx.h" #include <windows.h> #include <strsafe.h> #include <iostream> #include <exception> void main() { dword dwskip; dword dwflags; dword dwdatalen; //lpcwstr pszinput = l"jaaaaaecaaadzgaaakqaagdnnl1l56bwgfjdgr3rpxtqqqn6daw3usv2emkjym4t"; //this works fine lpcwstr pszinput = l"mytest"; //doesnt work, api returns false,error code 0x0000000d // determine size of byte array , allocate memory. if(! cryptstringtobinary( pszinput, _tcslen( pszinput ) + 1, crypt_string_base64, null, &dwdatalen, &dwskip, &dwflags ) ) { dword dw = getlasterror(); //0x0000000d: data invalid throw std::exception( "error computing byte length." ); } byte *pbytebyte = null; try { ...
Read more

c++ - Correct method for redrawing a layered window -

i have window created ws_ex_layered window style. drawing onto memory bitmap using gdi+, , using updatelayeredwindow update graphical content of layered window. intend use window main window of application, require redraw frequently. seeing layered windows not receive wm_paint windows message [?] , need come appropriate method re-drawing window. optimisation not essential , it's nice have cake , eat too. therefore, in search of "correct" method use. here thoughts far: i guess it's idea render onto off-screen bitmap before bitblt ing or similar. 60 frames rendered per second should (more than?) enough (but how compare other applications' frame rates?). possible solutions: use settimer send wm_timer message on regular basis. useful because through specifying time-out value, can achieve desired frames per second, without requirement measure duration "frame" takes rendered. would cause input or other lags due frequency , speed of m...
Read more

java.util.scanner - How to read and add only numbers to array from a text file -

i'm learning java , have question regarding reading file want read numbers file contains strings well. here example of file: 66.56 "3 java 3-43 5-42 2.1 1 and here coding: public class test { public static void main (string [] args){ if (0 < args.length) { file x = new file(args[0]); try{ scanner in = new scanner( new fileinputstream(x)); arraylist<double> test = new arraylist<>(); while(in.hasnext()){ if(in.hasnextdouble()){ double f=in.nextdouble(); test.add(f);} else {in.next();} } catch(ioexception e) { system.err.println("exception during reading: " + e); } } my problem add 66.56,2.1 , 1 doesn't add 3 after "3 or ignores 3-43 , 5-42 can tell me how skip strings , add doubles here? thanks all said 3 ie; "3, 3-43 , 4-42 strings either u read string , split , check number @ " , - or put in space between characters , integers. jvm after compilation tre...
Read more