トップ 差分 一覧 ping ソース 検索 ヘルプ PDF RSS ログイン

Excel VBA プロパティのコードを生成する



目次



記事一覧

キーワード

Excel VBA プロパティのコードを生成する

[Excel VBA][Python]

# -*- coding: utf-8 -*-

def make_vba_properties():
    
    fields = ['aaa','bbb','ccc']
    comments = ['AAA','BBB','CCC']
    
    for i in range(len(fields)):
        print 'Private m_%s\t\t\tAs String\t\' %s' % (fields[i], comments[i])
    
    for i in range(len(fields)):
        
        print '\''
        print '\' %s' % (comments[i])
        print '\''
        print 'Public Property Get %s() As String' % (fields[i])
        print '\t%s = m_%s' % (fields[i], fields[i])
        print 'End Property'

        print '\''
        print '\' %s' % (comments[i])
        print '\''
        print 'Public Property Let %s(ByVal %s As String)' % (fields[i], fields[i])
        print '\tm_%s = %s' % (fields[i], fields[i])
        print 'End Property'

if __name__ == '__main__':
    make_vba_properties()



YAGI Hiroto (piroto@a-net.email.ne.jp)
twitter http://twitter.com/pppiroto

Copyright© 矢木 浩人 All Rights Reserved.