View scrapeFromCell.vba
Public Sub scrapeFromCell()
'bdoherty 2012 08 09
'scrapes text from the VARTXT cell
'based on code that was Posted by Jon Summers
'on Mon, Jan 2 2012 12:15 PM at bit.ly/TityVa
Dim oCells As ElementEnumerator
Dim oElement As Element
Dim oCriteria As New ElementScanCriteria
Dim oCell As CellElement
View gist:da389a7503f37f6a149849931218da31
#!/usr/local/bin/ruby
# -*- coding: cp932 -*-
require 'win32ole'
require 'delegate'
require 'singleton'
require 'util'
module VISIO
module VisioConsts
View tksoleb.rbw
# -*- encoding: utf-8 -*-
# Original 'soleb' is written by Masaki Suketa ( http://homepage1.nifty.com/markey/ruby/win32ole/index_e.html ).
# This qtbindings version is modified by Toshiaki Yoshida ( toshi@doju-m.jp ).
# DO NOT ASK ABOUT THIS VERSION FOR ORIGINAL WRITER.
# You can redistribute it under the terms specified in the COPYING file of the Ruby distribution.
# THIS SOFTWARE IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS OR
# IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
# WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
View xlshelper.rb
# -*- coding: windows-31j -*-
# Excelを扱うときの支援用
# 2012/10/17 吉田
require 'win32ole'
class XlsHelper
# 最初にExcelをインスタンス化したときに定数をインポートする
View outlook-export-ics.rb
#! /usr/bin/ruby
# -*- coding: utf-8 -*-
require 'win32ole'
olFolderCalendar = 9
WIN32OLE.codepage = WIN32OLE::CP_UTF8
ol =
begin
WIN32OLE.connect("Outlook.Application")
View extracVBAModules.rb
def extract_vb_modules(paths)
require 'win32ole'
excel_app = WIN32OLE.new('Excel.Application')
excel_app.ScreenUpdating = false
excel_app.EnableEvents = false
excel_app.DisplayAlerts = false
#excel_app.Calculation = -4135
View msproject_filter_by_taskname_and_sort.rb
#!/usr/bin/ruby
%w( win32ole pp date ).each { |dep| require dep }
doc = 'C:\Users\rdapaz\Dropbox\Karara\Schedule\K2 Master Schedule - Delayed FAT Scenario.mpp'
mpp = WIN32OLE.new('MSProject.Application')
mpp.Visible = true
mpp.FileOpen(doc)
tasks = []
mpp.ActiveProject.Tasks.each do |tsk|
View proxyset
##
##LANにプロキシサーバを使用するかどうかを設定
##
require 'Win32/Registry'
require 'win32ole'
wsh = WIN32OLE.new('WScript.Shell')
reg = Win32::Registry::HKEY_CURRENT_USER.open('Software\Microsoft\Windows\CurrentVersion\Internet Settings', Win32::Registry::KEY_ALL_ACCESS)
value = reg['ProxyEnable']
View gist:9d177e57840b7e0c3900b53e65d4862c
#! ruby -Ks
# -*- coding: sjis -*-
require 'win32ole'
module Worksheet
def [] y,x
cell = self.Cells.Item(y,x)
if cell.MergeCells
cell.MergeArea.Item(1,1).Value
View michelson_cli.rb
#!/usr/bin/env ruby
require 'concurrent'
module ReportCli
class Runner
attr_accessor :run_times, :reporter
# This method will not limit the number of threads in the pool. It will