FinePix J10 表の解決方法

質問者が納得先ほど回答しようとしたら、質問を削除されてしまいました！ 一生懸命考えた結果でしたので、再質問があるかな？と思い保存しておきました。 そしたら、内容がちょっと変わったのでしょうか？ もう一度、今回の質問内容を読み直して、新たに考えるのもしんどいです。 ですから、先ほどの内容 ----D------ E---- F----G---- H-- I---- -J--- K---- ---L--- M １-積載重量--15Ｋ箱-15---10Ｋ箱-10--5Ｋ箱--5----5Ｋ箱以下-3 ２--------...

質問者が納得エクセル2007は手元にないのですが Range("B11:H700").Select Selection.Copy のところを、下記のようにしたら動かないでしょうか？ Range("B11:H700").SpecialCells(xlCellTypeVisible).Select Selection.Copy 追記： 上記はマクロ記録をとった結果です。 オートフィルターをかけたあと Range("B11:H700")を選択して、 Ｆ５　セル選択...

質問者が納得入力時にリストを表示して選択するという回答を求めているものとすると データ→入力規則→入力値の種類にリストを選択 元の値に =IF(AND(A1=条件１,A2=条件Ａ),J1:J10,IF(AND(A1=条件１,A2=条件B),K1:K10,IF(AND(A1=条件２,A2=条件A),J7:K19,""))) と入力してみてください。 こんな感じでいいのかな。 （条件のところは、実際の条件を当てはめてください） 訂正です。 リストに直接計算式を入れるとエラーになることがあることを失念し...

質問者が納得I1: =IF(A1="赤",H1,"") J1: =IF(A1="青",H1,"") K1： =IF(A1="黄",H1,"") このセルを下方向にオートフィル 各列をSUM関数で合計を求めてみては・・・ または =SUMIF(A1:A10,"赤",H1:H10) 範囲及び””内は変更

質問者が納得作業用のシートを使ってもいいのであれば可能だと思います。 例えばA1:J10の100セルのうちバラバラ10セルに文字が入っているシートが "Sheet1"、作業用に使ってもいいシートが "Sheet2"だとします。 １）Sheet2のA1セルに「=ROW(B1)-COUNTIF($B$1:B1,"")」と入力します。 ２）Sheet2のB1セルに「=IF(OFFSET(Sheet1!$A$1,INT((ROW(B1)-1)/10),MOD(ROW...

質問者が納得御質問文に忠実に２つのセル範囲を指定してから実行するように作成してみました。 （ただし、一致しない部分の色は xlColorIndexNone とするよう、勝手に処理を加えています。） 参考になさってみてください。 Sub Sample() Dim R As Range If Selection.Areas.Count <> 2 Then MsgBox ("２つの範囲を選択してから実行してください") Exit Sub End If If Selection....

質問者が納得Ａ列に =OFFSET(Sheet1!$A$1,0,ROW()-1)

質問者が納得できます。 Ａも開いた状態で、 Ｂに式を入力します。 これは例ですが、 =VLOOKUP(A2,[A.xls]Sheet1!$B$2:$J$10,2,FALSE) 範囲を指定するときに、ＡのB2:J10を指定すると、 このように表示されます。 もちろん、直接式を入力してもいいですが、 この方が簡単です。 作業が終わってＢを保存した後、 また開くときは下記のようになります。 Ａの表を開いていない状態でＢを開くと、 「このブックには、ほかのデータソースへのリンクが設定されています。 リンクを更...

質問者が納得◆これでいかがでしょう E4=IF($C4=E$3,IF(ISNUMBER($D4),$D4,1),""） ★右と下にコピー