• ベストアンサー

GrapeCityのSpreadの複数セルの取得について

度々、お世話になります。 Spread上で一つのセルが選択されている場合、 .Col = .ActiveCol .Row = .ActiveRow といったコードで選択されている位置を取得 できますが、セルブロックが選択されている場合 .Col1 = .???????? .Row1 = .???????? .Col2 = .???????? .Row2 = .???????? といった形式で選択セルの位置を取得したいと 考えております。 しかし、????????の部分がわからずに困っております。 どうかよろしくお願いいたします。

質問者が選んだベストアンサー

  • ベストアンサー
回答No.2

う~ん。 こうでしょうか。 .Action = ActionGetMultiSelection If .IsBlockSelected Or .MultiSelCount Then .BlockMode = True For x = 0 To .MultiSelCount - 1 .MultiSelIndex = x Next x Debug.Print .Col; .Row; .Col2; .Row2 .BlockMode = False End If 正しい方法か否かはわかりませんが・・・

sansan33311
質問者

お礼

いつもいつも、ご回答ありがとうございます。 試してみましたが、教えていただいた方法で セルの位置を取得できました。 どうもありがとうございました。

その他の回答 (1)

回答No.1

こんにちは。 .Col2 = .???????? .Row2 = .???????? とはいきません。 MultiSelCount とMultiSelIndex プロパティ を使います。 僕の以前の投稿をご覧ください。

参考URL:
http://okwave.jp/kotaeru.php3?q=2263341
sansan33311
質問者

お礼

otto0001otto様 毎度のご回答ありがとうございます。 MultiSelCount とMultiSelIndex プロパティは 教えていただいて、知っているのですが、知りたいのは 選択されているセルブロックの左上と右下のセルの 位置なのです。(選択されたセルブロックを データベースに登録したいので、、、) 申し訳ありません、質問の書き方がたりませんでした。 よろしくお願いいたします。

関連するQ&A

  • GrapeCityのSpreadについて

    いつもお世話になっております。 VB6.0、Spread3.0を使っています。 下記コードで罫線の色を変えようとしているのですが、 うまくいきません。 Me.vaSpread3.Col = Me.vaSpread3.ActiveCol Me.vaSpread3.Row = Me.vaSpread3.ActiveRow Me.vaSpread3.CellBorderType = 16 Me.vaSpread3.CellBorderStyle = 5 Me.vaSpread3.CellBorderColor = MyColor Me.vaSpread3.Action = SS_ACTION_SET_CELL_BORDER おわかりのかたがおられましたらよろしくお願いいたします。

  • Spreadの選択行の取得について

    いつもお世話になっております。 VB6、Spread3.0の環境でコーディングしています。 Spreadを単一行モードにして、1行だけ選択された 状態で選択された行の行番号を取得したいのです。 Me.vaSpread1.Row = Me.vaSpread1.SelModeIndex Me.vaSpread1.Col = 1 で取得しようとしても、うまくいきません。 どのようにすれば、行番号を取得できるのでしょう? ご存知のかたがおられましたら、よろしくお願い します。

  • GrapeCityのSpreadについて

    いつもお世話になっております。 GrapeCityのSpread3とVB6の組み合わせで、ある画面を 作っています。 実現したいことは、画面のSpreadのセルをマウスで ドラッグし、複数のセルを選択します。そして、 ユーザーが選択した複数セルの背景色をユーザー自身が 変更できるようにしたいのですが、方法がわかりません。 マウス右クリックでメニューを表示し、そこから 背景色変更のダイアログなりを表示できたら いいのですが、、、 どうか、よろしくお願いいたします。

  • 「Spread」のセルを移動させるプロパティ・メソッドはどれ?

     文化オリエントの「Spread 3.0J」をVBで使っています。  VBのコードを使ってアクティブセルを移動させようとしたのですが、ヘルプを見てもセルを移動させるプロパティ・メソッドが見つかりません。  FAQも探したのですが、どうしてもこの処理だけが見つかりません。  「Col」「Row」プロパティではなさそうですし。  ・・・あまりに基本的な処理すぎて、どこか見落としているのでしょうか??  どなたかヒントを教えていただけないでしょうか。

  • SPREAD(GrapeCity)のセルにフォーカスを設定するにはどうしたらいいのでしょうか?

    VB.netで作成しています。 SPREAD(GrapeCity)の下記のイベントでSPREADのセルに入力された値をチェックしてエラーが無ければデータベースに登録、または更新をして入力エラーがあった場合、セルにフォーカスを設定するように記述していますがうまくフォーカスを設定する事ができません。 ・SPREADのChangeイベント ・SPREADのKeyUpイベント ・SPREADのLeaveイベント ・SPREADのCellLeaveイベント フォーカスを当てたいセルの行番号とカラム番号をSetActiveCellで指定していますが・・・ フォーカスを設定するにはどうしたらいいのでしょうか? ご存知の方がいましたらアドバイス宜しくお願いします。 では、失礼します。

  • スプレッドのアクティブセルの値を取得したい

    スプレッドでアクティブセルで選択した位置の値を取得したいのですが、どのように記述したらよいでしょう? spr.Col = spr.Activecol spr.Row = spr.ActiveRow ↑セルの位置は取得できているみたい。選んだ値(文字なり、数字)を取得したいのですが。 教えてください。

    • 締切済み
    • CSS
  • SPREADの行の削除

    VB6.0 SPREAD3.0 OS:2000 SPREADでカレント表示した行を削除ボタンを押したら 削除したいのですがやり方がうまくわかりません。 クリックしたらカレント表示 Private Sub oSpmain_Click(ByVal Col As Long, ByVal Row As Long) With oSpmain .ReDraw = False .Row = -1: .Col = -1: .BackColor = vbWhite .ForeColor = RGB(255, 300, 0) .BlockMode = True .Row = Row: .Row2 = Row .Col = 1: .Col2 = .MaxCols .BackColor = .ForeColor .ForeColor = vbWhite Xor .ForeColor .BlockMode = False .ReDraw = True End With End Sub ここまではできたのですが、削除が思うようにできません。アドバイスお願いします。

  • スプレッドシートの基本的な事

    スプレッドシートの基本的な事を教えてください。 現在VB6+SPREAD7で開発中です。 下記の基本的な事をおおしえください。 1)SPREADのLeaveCellイベントはどこかの、セルをクリックすれば発生するのでしょうか。 2)LeaveCellの引数で,COL,ROW,NEWCOL,NEWROWとありますが COL,ROWはクリック位置のことでしょうか、その場合、NEWCOL,NEWROWはどのような定義なのでしょうか。 よろしくお願いします。

  • Spreadでの複数行選択

    VB6,Spread6で開発しています。 複数行の選択を許した場合、選択された行の取得方法を教えてください。 よろしくお願いします

  • エクセルでのセル範囲取得

    セルの選択された範囲をVBAで取得する時、選択開始行は「ActiveCell.Row」で取得出来ますが、 選択終了行を取得するプロパティは無いのでしょうか? 「Selection.Cells.Count」を使用して、選択範囲の行数が返って来るのは分かっています。 問題なのはセルの選択順序です。 セルの範囲選択を上から下方向の場合は問題無いのですが、下から上に選択した場合、 選択開始行より下なのか、上なのかが判断出来ません。 そこで、選択範囲の行数ではなく、選択範囲終了の「行位置」が取得できる方法が無いかと色々調べてみましたが、見つけられませんでした。 どなたか御存知でしたら教えて下さい。

専門家に質問してみよう