[[20050225112650]]　『上の行と同じ数字を入力』（はる）　ページの最後に飛ぶ

『上の行と同じ数字を入力』（はる）

１つ上の行と同じ数字をセルに反映させたいのです。。

りんご 1

	空欄
みかん	2
	空欄
いちご	5
ばなな	2
もも	3
	空欄

上記のようなリストで、空欄には上の行と同じ数字を入力します。
例えば、りんごの場合は、空欄には１が、みかんの場合は空欄には２が
入力されます。
空欄のない、いちごやばななのような項目もあります。
５００行くらいのリストが１０シート程あるので、ひとつずつ入力せずに
シートごとくらいの単位で一括で入力したいのです。
どなたか良い方法を教えて頂けますでしょうか。

[[20041214124833]]『次データの前まで下方コピー』（ひよっぴ）

 これですか？
 (代奈)

そうです！できましたヽ(^o^)丿
こんなに簡単にできてしまうなんて、本当にうれしいです(^^♪
代奈さん、どうもありがとうございました！
（はる）

 勉強のためにマクロを作ってみました。範囲を指定してマクロ実行です。
 空白セルが２つ続くと終了します。
 （純丸）

 Sub 空白入力()
　 Dim r As Range
 　For Each r In Selection
  　 With r
   　If .Value = "" Then
    　  .Value = r.Offset(-1, 0).Value
     　 If .Offset(1, 0).Value = "" Then
      　   Exit Sub
  　    End If
  　 End If
   　End With
 　Next r
 End Sub

純丸さん、ありがとうございます♪
上記のマクロも実行してみます！
（はる）

上記のご回答を頂いているのですが、今度は同じ数字を入力ではなく、
上の行と同じ文字を入力したいのです。
教えて頂いた方法ですと、同じ文字は入力できないようですので、
同じ文字を入力できる方法がありましたら、教えて頂けますでしょうか。
（はる）

 ん？
 文字も反映しますよ？
 空白セルに入った式を見て下さい。
 =A2　のようになっていますよね(^^)
 数字でも文字でも、上と同じものが入るはずですよ～
 (代奈)

早速のお返事ありがとうございます！
空白セルに入った式＝A2の表示のまま、
文字はセルに反映されないのです。。。
やり方は数字のときと同じようにやっているのですが
なにか考えられる原因はありますでしょうか？
（はる）

 むーん(ーー;)
 そのセルで、F2を押してEnterするとどうなりますか？
 (代奈)

アクティブセルが、次の＝A2のセルに移動します。
代奈さんのエクセルでは、同じ方法で文字も反映できるのですよね？(^_^;)
（はる）

 移動するだけ。。。??
 そのセルは空白表示のままなのですか？
 それとも、まさかまさかセルに「=A2」とか表示されてる、なんてことはないですよね(ーー;)
 (代奈)

 もしそうなら書式設定が文字列になっていますので、
 その列全部を選択した状態で、メニューバーの「データ」＞「区切り位置」で何もせず「完了」
 (代奈)

 あ、ダメだ(ーー;)
 もともと文字列になっていると、「=A2」ばかりが式化されてしまう。
 先に、その列を標準にしておけばうまくいくみたい。
 (代奈)

設定を標準にして、もう一度やってみたら
できましたっ！！！
代奈さん、丁寧に教えてくださって本当にありがとうございました(*^_^*)
（はる）

 ほっ。。。
 無事に出来て、よかったですね～(*^◇^*) 
 (代奈)

コメント返信：

[ 一覧(最新更新順) ]

[[20050225112650]] 『上の行と同じ数字を入力』（はる） ページの最後に飛ぶ

[[20050225112650]]　『上の行と同じ数字を入力』（はる）　ページの最後に飛ぶ