[#66126] Creation/Conversion methods/functions table for Ruby types — SASADA Koichi <ko1@...>
Hi,
5 messages
2014/11/07
[#66248] [ruby-trunk - Feature #10423] [PATCH] opt_str_lit*: avoid literal string allocations — normalperson@...
Issue #10423 has been updated by Eric Wong.
3 messages
2014/11/13
[#66595] [ruby-trunk - Bug #10557] [Open] Block not given when the argument is a string — bartosz@...
Issue #10557 has been reported by Bartosz Kopinski.
3 messages
2014/11/30
[ruby-core:66213] Re: Excel saveas using a variable
From:
David Morrison <davesruby@...>
Date:
2014-11-11 20:19:19 UTC
List:
ruby-core #66213
Oh, okay!
So what's the answer? LOL
On Tue, Nov 11, 2014 at 9:46 AM, Marc-Andre Lafortune <
ruby-core-mailing-list@marc-andre.ca> wrote:
> Please use ruby-lang instead of this mailing list (or
> StackOverflow.com) for generic Ruby questions. This mailing list is to
> discuss bugs and new features of Ruby.
>
> On Tue, Nov 11, 2014 at 8:21 AM, David Morrison <davesruby@gmail.com>
> wrote:
> > When I run this code in Sketchup, it performs it's duties, then opens
> excel,
> > enters the info, then I want it to save as the Address.
> >
> > And that is where I am having the problem.
> >
> > Thanks.
> >
> >> ents=Sketchup.active_model.active_entities
> >> prompts = ["Company Name", "Address","One","Two","Three","Four"]
> >> defaults = ["My Co","69 Your Street",1.0,2.0,3.0,4.0]
> >> input = UI.inputbox prompts, defaults, "Risers"
> >> a,b,c,d,e,f=input
> >> ent = Sketchup.active_model.entities
> >> pts = []
> >>
> >> pts[0] = [0,c,0]
> >> pts[1] = [0,d,0]
> >> pts[2] = [0,0,e]
> >> pts[3] = [0,0,f]
> >>
> >> # Add the face to the entities in the model
> >> face = ent.add_face pts
> >> face.pushpull 4
> >> #Open excel and enter info
> >> require('win32ole')
> >> excel = WIN32OLE.new('Excel.Application')
> >> excel.Visible = true
> >> workbook = excel.Workbooks.Open('C:\TestFolder\Test.xlsx')
> >> ws = workbook.Worksheets(1)
> >>
> >> ws.Cells(1,1).Value = a
> >> ws.Cells(1,2).Value = b
> >> ws.Cells(1,3).Value = c
> >> ws.Cells(1,4).Value = d
> >> ws.Cells(1,5).Value = e
> >> ws.Cells(1,6).Value = f
> >>
> >> # workbook.SaveAs("C:\TestFolder\" + b + ".xlsx")#trying to get
> >> 'Customer Address' as the saved workbook
> >>
> >>
> >
>