A16
x
Gizport
  • Q&A

  • 取扱説明書・マニュアル (文書検索対応分のみ)

 
"セル"20 - 30 件目を表示
全般
 
質問者が納得やっぱりマクロになります^^Sub try3()Dim i As Long, n As Longn = 0n = Range("a1").End(xlDown).RowFor i = n To 1 Step -1 Rows(i + 1).Resize(3).Insert shift:=xlShiftDown Cells(i, 1).Copy Cells(i, 1).Resize(3).Offset(1)NextEnd Sub上記を標準モジュールにコピペします。Alt+F11 & ...
5453日前view35
全般
 
質問者が納得ymc33573さんこんなお馬鹿な式でいいですか?=SUMPRODUCT(LEN(SUBSTITUTE(A1:A15,"カード","カード+")))-SUMPRODUCT(LEN(A1:A15))
5500日前view16
全般
 
質問者が納得関数を使わないでも良いなら、本命の方だけ回答します。まず、1行目に新しい行を追加します。そして、A1とB1にタイトルを付けます。何でも良いので、とりあえずA1には「AA」、B1には「BB」とでもしておきましょう。エクセル2007をご使用のようなので、次からは、下記のサイトをご覧になって、操作してみて下さい。↓重複データの削除http://www.eurus.dti.ne.jp/~yoneyama/Excel2007/excel2007-filter2.html#jyufukunosakujyoB列については...
5505日前view17
全般
 
質問者が納得単純に1と入力したものを001と表示させたいのであれば、セルの書式設定で000と定義しておけば、1→001と表示されます。Kなどの文字を先頭につけるのであれば、"K"000と定義すれば固定文字を付加することもできます。変更するセルが固定ではない場合や、付加する文字列が変わる場合などはマクロで実行するといいかと思います。実際のマクロについてはマクロの記録を使って確認してみるといいかもしれません。
5550日前view54
全般
 
質問者が納得A6~A30の中で合計する場合=SUMPRODUCT((MOD(ROW(A6:A30)-1,5)=0)*A6:A30)5行間隔のときは、MOD(行,5)=0とします。5で割った余りが0のとき集計するからです。質問の場合は、A6から始まるからMOD(行-1,5)=0行から1を引いてから5で割りました。
5565日前view35
全般
 
質問者が納得【補足による追記】>でもこれだと0も空白も計算してしまいます =AVERAGE(A4,A10,A16,A22,A28) の式では、◆たとえばA28が空白の場合は「57」=(53+59+40+76)/4 になり、◆「空白」は平均の計算されていません◆A28が「0」の場合は、「45.6」=(53+59+40+76+0)/5 になります◆「0」は平均の計算に含まれています◆「0」も平均に含めないのであれば =SUM(A4,A10,A16,A22,A28)/((A4<>0)+(A10<>...
5601日前view40
全般
 
質問者が納得AutoFilterを記録してくださいhttp://www.eurus.dti.ne.jp/~yoneyama/Excel/vba/vba_01.htmlちゃんと記録して 見比べて 吟味してくださいhttp://www.google.co.jp/search?hl=ja&lr=&safe=off&num=50&q=excel+autofilter+vba&revid=1882597890&ei=h8HaSdHhH4fU7APXyPGHCA&sa=X&a...
5636日前view166
全般
 
質問者が納得>A4~A33 A3コピー>上記の様に設定してあります。この部分が間違いですね。前回の質問を拝見しましたが、A3セル =DATE(YEAR(E1),MONTH(E1)-1,21)A4セル =A3+1 A10までコピー A11セル =IF(A10="","",IF(DAY(A10+1)>20,A10+1,""))A12 A13セル A11セルをコピーA14セル =DATE(IF(MONTH(A3)=12,YEAR(A3)+1,YEAR(A3))...
5642日前view37
全般
 
質問者が納得A1に、=IF(C1="","",INDIRECT("C"&CEILING(ROW()/8,1)*8))これを下へオートフィルして下さい。C列が未入力なら、A列にも日付が表示されないようにしました。
5722日前view25
全般
 
質問者が納得こんにちは~^^=MID(CELL("filename",$A$1),FIND("]",CELL("filename",$A$1))+1,31)シート名を入れたいセルにこの式をそのまま貼り付けてください。編集は不要です。補足に対してすみません。セルにそのままではなく数式バーに貼り付けてください^^;因みに、、、式の内容はちゃんとチェックされたのでしょうか?#NAME?が出るということはそんな関数ありませんというエラーです。式が途中で途切れていたりし...
5751日前view25

この製品について質問する