excel - Sorting using VBA -

-

i have code below

dim lasteuro long  thisworkbook.sheets("euro cash").range("a2:af").sort key1:=range("t2:t"), order1:=xlascending, key2:=range("v:v"), order2:=xlascending, header:=xlyes  lasteuro = sheets("euro cash").range("a1").end(xldown).row sheets("euro cash").range("a:u").autofilter field:=17, criteria1:=array("lnccp", "lnlchscm"), operator:=xlfiltervalues   'sec no.' sheets("euro cash").range("d2:d" & lasteuro).copy sheets("master").range("k6").pastespecial paste:=xlpastevalues 'cpty name' sheets("euro cash").range("f2:f" & lasteuro).copy sheets("master").range("l6").pastespecial paste:=xlpastevalues 'break' sheets("euro cash").range("i2:i" & lasteuro).copy sheets("master").range("m6").pastespecial paste:=xlpastevalues 'age' sheets("euro cash").range("p2:p" & lasteuro).copy sheets("master").range("p6").pastespecial paste:=xlpastevalues  sheets("euro cash").showalldata

however upon running, get:

run-time error '1004' : method range of object _global failed.

i clicked on debug, highlights this

thisworkbook.sheets("euro cash").range("a2:af").sort key1:=range("t2:t"), order1:=xlascending, key2:=range("v:v"), order2:=xlascending, header:=xlyes

so did change thisworkbook.sheets sheets - still same error.. should do?

the use of range object within range .sort method open interpretation parent worksheet is.

dim lasteuro long  sheets("euro cash")     if .autofiltermode .autofiltermode = false     lasteuro = .cells(rows.count, 1).end(xlup).row      .range("a:af").sort key1:=.columns(20), order1:=xlascending, _                         key2:=.columns(22), order2:=xlascending, _                         header:=xlyes      .range("a:u").autofilter field:=17, criteria1:=array("lnccp", "lnlchscm"), _                              operator:=xlfiltervalues     'sec no.'     .range("d2:d" & lasteuro).copy     sheets("master").range("k6").pastespecial paste:=xlpastevalues     'cpty name'     .range("f2:f" & lasteuro).copy     sheets("master").range("l6").pastespecial paste:=xlpastevalues     'break'     .range("i2:i" & lasteuro).copy     sheets("master").range("m6").pastespecial paste:=xlpastevalues     'age'     .range("p2:p" & lasteuro).copy     sheets("master").range("p6").pastespecial paste:=xlpastevalues      if .autofiltermode .autofiltermode = false end

note use of .range , not range. means parent 1 defined in with ... end statement. required indicate first cell when defining key.

after looking closer @ of code (and reviewing comments provided) i've changed sort range recognizes column header labels in row 1.


Comments

Post a Comment

Popular posts from this blog

qt - Using float or double for own QML classes -

-
i've created components , helper methods using c++ , qt used in qml gui. of methods calculate gui elements (size, transformations, scene graph items creation). target arm 32 bit using opengl / eglfs render output. opengl using float , qml using real (defined double ). what should use in c++ do not lose precision? if use qreal ( double ) shouldn't lose precision. if git grep float in qtbase.git , can find out bit more: dist/changes-5.2.0-**************************************************************************** dist/changes-5.2.0-* important behavior changes * dist/changes-5.2.0-**************************************************************************** dist/changes-5.2.0- dist/changes-5.2.0- - qt compiled qreal typedef'ed double on dist/changes-5.2.0: platforms. qreal float on arm chipsets before. guarantees more dist/changes-5.2.0- consistent behavior between platforms qt supports, binary dist/chan...
Read more

Create Outlook appointment via C# .Net -

-
i need create outlook appointment using microsoft.office.interop.outlook , while can work locally on own workstation , works if run web application via server's browser, not work when connect server externally. hence, think might permission issue. i changed application pool identity " localsystem " don't access denied error. unfortunately, doesn't work. the app behaves if appointment created, appointment doesn't appear in outlook. here include file on top of aspx.cs page using outlook = microsoft.office.interop.outlook; here code using pop appointment. outlook.application apptapp = new outlook.application(); outlook.appointmentitem appt = apptapp.createitem(outlook.olitemtype.olappointmentitem) outlook.appointmentitem; appt.subject = txtfirstname.text + " " + txtlastname.text; appt.body = txtcomment.text; appt.alldayevent = false; appt.start = datetime.parse(txtreminderdate.text + " 8:00 am"); appt.end = datetime.p...
Read more

ios - Swift Array Resetting Itself -

-
i have 2 arrays: pointhistory , datehistory . have nstimer , , when timer runs out, action called. in action appending int pointhistory , , current date string datehistory . here timer action: func timeraction() { let steppervalue = int(stepper.value) employee.numberofpoints = steppervalue networking.saveemployee(employee, completion: { (error) -> void in if error != nil { let alert = uialertcontroller(title: "error", message: "there error updating \(self.employee.name)'s points", preferredstyle: .alert) let alertaction = uialertaction(title: "ok", style: .cancel, handler: nil) alert.addaction(alertaction) self.presentviewcontroller(alert, animated: true, completion: nil) } }) var dateformatter = nsdateformatter() dateformatter.dateformat = "mm-dd-yyyy" dateformatter.timezone = nstimezone.localtimezone() var date = nsdate() var ...
Read more