search for: cominvok

...chive and x$Exit() and Excel refuses to die. Thank you very much. S. "You can't kill me, I will not die" Mojo Nixon I also have a problem with saving. It produces a pop-up dialog and does not take my second parameter: x<-comCreateObject("Excel.Application") wb<-comInvoke(comGetProperty(x,"Workbooks"),"Open","G: /MR/Stephen/repo. xls", "0") sh<-comGetProperty(wb,"Worksheets","Market Data") range1 <- comGetProperty(sh,"Range","C10","I11") vals <- comGetProperty(range1,...

...> xlsfile <- file.path(path,xls) > > file.exists(xlsfile) [1] TRUE > > > > oxl <- comCreateObject("Excel.Application") > > comSetProperty(oxl, "Visible", TRUE) NULL > > owb <- comGetProperty(oxl, "Workbooks") > > ob <- comInvoke(owb, "Open", xlsfile) > > osheets <- comGetProperty(ob, "Worksheets") > > n <- comGetProperty(osheets, "Count") > > ithSheetName <- function(i) comGetProperty(comGetProperty(osheets, "Item", i), "Name") > > sheetNam...

...the presentation and the table: require(R2PPT) # initialize the presentation myPres<-PPT.Init(visible=TRUE) # create title slide myPres<-PPT.AddTitleSlide(myPres,title="Fancy Title",subtitle="Fancy SubTitle") # create and select a table slide myPres$Current.Slide <- comInvoke(comGetProperty(myPres$pres, "Slides"),"Add", comGetProperty(comGetProperty(myPres$pres, "Slides"), "Count") + 1, 4) comInvoke(myPres$Current.Slide, "Select") # populate the slide's title slideTitleHanlde <- comGetProperty(comGetProperty(com...

...t doesn't work. cls <- function (t) { require(RDCOMClient) wsh <- COMCreate("Wscript.Shell") wsh$SendKeys("\f") invisible(wsh) } cls() or cls <- function() { require(rcom) wsh <-comCreateObject("Wscript.Shell") comInvoke(wsh, "SendKeys", "\f") invisible(wsh) } cls() Can anybody help me to solve this problem? Thanks. -- View this message in context: http://r.789695.n4.nabble.com/clear-console-tp4521532p4521532.html Sent from the R help mailing list archive at Nabble.com.

...g this routine for several years. I?m sorry, I don?t remember where I got it. It works as it should, viz. it blanks the R console. But it requires package rcom and now that requires rscproxy. cls <- function () { require(rcom) wsh <- comCreateObject("Wscript.Shell") comInvoke(wsh, "SendKeys", "\f") invisible(wsh) } > cls() Loading required package: rcom Loading required package: rscproxy This seems like overkill to me just to blank the R console, especially since I am trying to diminish the number of necessary packages to support my home-br...

...#Connect to the active Workbook excel <- comGetObject("Excel.Application") #Set the active sheet sheet <- comGetProperty(excel,"ActiveSheet") #Set a specific sheet sheet <- comGetProperty(excel,"Worksheets","WorksheetXY") #Create a new Worksheet comInvoke(comGetProperty(excel,"Worksheets"),"Add") #Define a range in a defined sheet range1 <- comGetProperty(sheet,"Range","A1","A20") #Read out this range from Excel val1 <- as.double(comGetProperty(range1,"Value")) #Give back the resu...

...that message, but to no avail (I tried more variations, but one attempt is shown below). How can I suppress such messages?   excel <- comCreateObject("Excel.Application") wb <- comGetProperty(excel, "Workbooks") comSetProperty(wb, "UpdateLinks", FALSE) owb <- comInvoke(wb, "Open", xlsfile) # at this point, it's too late Another query: the program at large erases any cells that contain formulae. Thanks to Erich, the program now works like a charm. However, some cells contain formulae such as "832.1 * E4 * E3"  (yes I know: big, big *sigh*...

Greetings R-ians: Searching the Searchable Mail Archives I discovered that ctrl L will clear the Rgui screen, which is what I'd like to do from a print (or some similar) statement. Is there a mechanism to use the ctrl L clear-screen sequence in a script, or print statement? Thanks for your counsel. Charles Annis, P.E. Charles.Annis at StatisticalEngineering.com phone: 561-352-9699 eFax:?

Hi, I would like to some excel files with some worksheets. I tried this with the following R script: library(gdata) i<-1 rc<-0 while(rc != "try-error") { wksh<-try(read.xls("cluster-microarray-FW.xls",sheet=i,verbose=TRUE,perl="perl")) rc<-class(wksh) print(sprintf("------- i=%2d rc=%s ---------------",i,rc)) if (rc !=

something like "sprintf" in C? so I can do: print(sprintf("the correct result is %3.4f\n", myresult)); ------- Also, I am desperately looking for a "clear console screen" function in R... thanks a lot! [[alternative HTML version deleted]]

...tPropery() always get the part of the Chinese character. Any suggestion would be appreciated. Thanks. Michael > library(rcom) Loading required package: rscproxy > txe<-comCreateObject("Excel.Application") > comSetProperty(txe,"Visible",TRUE); NULL > newwb <- comInvoke(comGetProperty(txe,"Workbooks"),"Add") > ws <- comGetProperty(newwb,"Worksheets",1) > e<-comGetProperty(ws,"Range","A1") > comSetProperty(e,"Value","abc defg hijl agfasdg") NULL > comGetProperty(e,"Value&q...

...I don?t remember > where I got it. It works as it should, viz. it blanks the R console. But > it requires package rcom and now that requires rscproxy. > > cls <- > function () > { > require(rcom) > wsh <- comCreateObject("Wscript.Shell") > comInvoke(wsh, "SendKeys", "\f") > invisible(wsh) > } > >> cls() > Loading required package: rcom > Loading required package: rscproxy > > This seems like overkill to me just to blank the R console, especially since > I am trying to diminish the number...