まぁ、当然開発中に必要になるのがこういうヤツですね。 以下３つの投稿を組み合わせているのでおまけで載せときます。追記：＠2011.09.30 16:30 Doevent を挟んでもシェイプの選択描画がうまくいかなかったので、 該当セルを着色してどのセルの確認かを見や…

カラム番号 To カラム名 ってことです。 よく使うので書いておきます。 ' セル番号に該当するセル名に返します Public Function rangeToColmunName(lngRow As Long, intCol As Integer) As String Dim strBuf As String strBuf = Cells(lngRow, intCol).Addr…

シェイプに何かする前。 つまり、シェイプを指定する場合には当然、 シェイプが存在している必要があるわけで それを関数にするとなると色んなやり方がうまれます。 都度書くのが面倒なので、以下に残します。 ' 指定したシェイプが存在すればTrueを返します…

どうせ使うことになるので、書いておきます。 Public Function getShapeRange(strShapeName As String) As String getShapeRange = _ ActiveSheet.Shapes(strShapeName).TopLeftCell.Address(False, False) End Functionまぁ、オフセットでなくRangeで返した…

んだよ。 できるんじゃん！すみません。 探してみるものです。シェイプにマクロを登録することができるわけですが、 そのマクロに引数が渡せないのかと思っておりました。シェイプにマクロを登録すると、そいつをクリックしても Selection にはならないので…

例えば、Line のシェイプを選択した状態。 つまり、Selection の中身はLineオブジェクト(Object/Line) の場合、 あたかもSelection のプロパティに Lineオブジェクトのプロパティも 表示されるような気になってはいけない。当たり前だが、内部変数がLineなだ…

どこにも記載がないので載せておきます。Me.imageCombobox1.SelectedItem でも、.text でも 初期行の選択ができなかったので以下の処理で実現。 なんか、これ.NET時代にやった気が・・・。ｗ Me.imageCombobox1.ComboItems(intIndex).Selected = True参考ま…

シェイプの書式変更をコモンダイアログから設定する方法。 以下は、指定したシェイプ名の書式を変更します。 ※ Line シェイプじゃないと動作しないようにしています。 ' 選択したオブジェクトの色をダイアログから設定させます。 Public Sub colorSetFromDia…

シェイプのコピーではなく、書式のみの複写をしたい場合どうするか。 もう・・こんなことすら覚えてない時点で俺の馬鹿馬鹿馬鹿！！ で、自作してしまったわけですが・・。 ※ 面倒なのでテストしてませんが、以下の Selection.ShapeRange.IncrementLeft sngY…

ガントチャートを作る作業をちまちまやってるわけですが、 昨日くらいからどうでもよいところに躓いてます。 まぁ、気にしなきゃよいのですがちょっと画像処理系（？）弱いなぁと 思うのでがんばってます。昨日は、・オートシェイプをフォームに表示したい …

元ネタはこちらのサイトです。参考：お手製 簡易ガントチャートをグラフで作ってみる。 http://edutainment-fun.com/excel/example/ganttchart.htmlここで記載されていたほかの方法は試したことがあるのですが、 これは面白そうなので試してみたらスゴイ苦労…

ふと作ってみたくなったのだが、頭が硬直してわからんでしたので、 検索してみたらマイクロソフトが公開していた。 =SUM(LEN(A2:A7)-LEN(SUBSTITUTE(A2:A7,"p","")))これは、範囲だけれど =LEN(A2)-LEN(SUBSTITUTE(A2,"p",""))とすれば、当然、セル範囲内の…

言語は何でもよいのですが、クエリの散在をどう防ぐかという仕組みやルールが 必要になります。FW を使うとFWで適用されないようなかなり簡易なレベルのクエリや逆に複雑な レベルのクエリをどう散在させず管理するか。いずれにしても発行出入口をひとつにす…