[[20030926201859]]　『セルのデータからシート名』（ぽん）　ページの最後に飛ぶ

『セルのデータからシート名』（ぽん）

  1シートにＢ列(Ｂ３～Ｂ100）ＩＤ
           Ｃ列　　　  　　　氏名
           Ｄ列　　　  　　　日付
           Ｅ列～Ｈ列　　　　数値
           Ｉ列～Ｌ列　　　　数値（小数点以下１位）
           Ｍ列　　　　　　　数式(J3-I3)/(F3-E3）
           Ｎ列　　　　　　　ＩＦ関数
  １行ごとに別のシートで2軸の折れ線グラフが100シート作成してあります。
　（Ｅ～Ｈ、Ｉ～Ｌで2軸）
　あとは数値データを入力していく形です。
  氏名を入力してからシート名を変更しているのですが、氏名を入力したら自動的にシート名を
　変更することはできるでしょうか？
　Sheet1がデータ一覧（セルＣ３氏名がSheet2、Ｃ４がSheet3、Ｃ５がSheet4というように）
　
　あとグラフにＭ列のデータを｛○○○ 0.16}のように入れたい為、グラフオプションの
　第２項目軸は使っていないため、そこに○○○とあらかじめいれておいて、あとでＭ列の数値
　を入力していますが、テキストボックスの挿入等以外でできたら自動処理で行う方法はありま
　すでしょうか？

  質問ばかりで申し訳ないですが、このﾃﾞｰﾀが現在100ですがまだまだ増えていく可能性があり
　Accessで簡単な管理するものを作成したのですが、Accessで同じようなグラフが作れなく、
　このExcelのグラフを持ってきたいのですが、そういうことはできるのでしょうか？

 >シート名を変更

 どうぞ・・　
 　
 Private Sub Worksheet_Change(ByVal Target As Range)

 If Target.Column <> 3 Then Exit Sub
 If Target.Row < 3 Or Target.Row > Worksheets.Count + 2 Then Exit Sub
 If Target.Value = "" Then Exit Sub

   Worksheets(Target.Row - 1).Name = Cells(Target.Row, 3).Value

 End Sub

 (INA)

  INAさん　いつもありがとうございます。
　使わせていただきます。　　　　　　　　
 （ぽん）

コメント返信：

[ 一覧(最新更新順) ]

[[20030926201859]] 『セルのデータからシート名』（ぽん） ページの最後に飛ぶ

[[20030926201859]]　『セルのデータからシート名』（ぽん）　ページの最後に飛ぶ