Q&A
取扱説明書・マニュアル (文書検索対応分のみ)
"行"10 件の検索結果
"行" 一致するキーワードは見つかりませんでした。
全般
質問者が納得回答１．
レーシングカーを撮るのであれば、ピント合わせの早い機種が必要です。
まず、高倍率ズーム（ネオ一眼や１０倍ズームのコンデジ）では無理です。
本当ならば、Kissクラスでは辛いところがありますが、予算が許さないということになります。
おすすめ機種は、ＥＯＳ ７Ｄとします。
回答２．
鈴鹿は広いですので、ダブルズームの望遠ズームでは辛いかも知れません。
高価になりますが、300mmF4 以上の望遠レンズをオススメします。
回答３．
望遠一杯まですればある程度はぼけるとは思います。
できれば、レンズ交...
5275日前view18
全般
質問者が納得はじめたばかりみたいなので
こんにちは。
Range("A1").Copy ’A1をコピー
Range("A1000").End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlPasteValues
'A1000（ここはおそらくこれ以上登録しないだろうと思われる行数で良いと思います。1000は任意で変更して下さい）
'A1000から登録済み最終行まで行って、1段下げたところ（offset(1,0)）に値のみ貼付け
...
4917日前view16
全般
質問者が納得End Subの前の行に
Worksheets("sheet2").Range("A1").Formula = "=SUM(A1:A500)"
を入れるとどうですか
4983日前view83
全般
質問者が納得１つ目の最後の文字がBの場合
Sub Macro1()
Dim I As Long '変数を定義しただけです
For I = 1 To 500 '1～500行まで繰り返す
If Right(Cells(I, 1).Value, 1) = "B" Then 'A列のI行の値の最後の1文字が"B"ならば以下を実行、違えば次の行へ移動する
Range(Cells(I, "A"), Cells(I, "Z")).Cut '対象の行のA～...
5010日前view17
全般
質問者が納得> A1からA500までに～
> A510（510行目）へ貼り付け、
> 400行目を削除する
文字を含むデータと含まないデータの間に
空白行を９行挿入し、全体を５０９行とする、
と想定します。
（違う場合は適宜変更して下さい）
-------------------------------------------
作業列を２列挿入します（例えばＢ列・Ｃ列）
Ｂ列には１から順に５００まで入力（フィル）
C1
=IF(ISERR(MID(A1,9,1)*1),1,0)
C500...
5012日前view20
全般
質問者が納得B列に1を入力してオートフィルします。
（1～A列最後500位まで数を振ります）
B列を1行目から500行目までコピーしてB列最後にくっつけます。
B列で並び替え（昇順）をします。
これで一行置きに出来ます。
後はB列を削除してください。
5303日前view20
全般
質問者が納得通常、VBAでは条件付き書式なんて使いません。
If…Then…Elseステートメントを使って条件に合っているかどうかを判断し色付けを行います。さらに、doステートメントやforステートメントを使ってセル範囲に繰り返します。
例えば、A2:A500のセル範囲に「*」が入力されていたら灰色に塗りつぶし、空欄ならば黄色に塗りつぶすには下のようなコードになるでしょう。
For i = 2 To 500
If Cells(i, "B") = "*" Then
Cells...
5372日前view19
全般
質問者が納得こんにちは
『B列』のセル内容が変わったら
から
『A列』のセル内容が変わったら
に変わっていますが・・・
A列を入力⇒B列を入力したら
A列のデータから『VLOOKUP関数』で『帳簿在庫』シートから
『C列』にデータを表示させ、D列に『C列』から『B列』をマイナスした数値を表示・・・かな？
対象シートのシートモジュールに
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 2 Or Targe...
5408日前view18
全般
質問者が納得=AVERAGE(B1:INDEX(B:B,COUNT(A:A)))
でいかがでしょうか？
別シートで算出するなら、↓のようになります。
=AVERAGE(Sheet1!B1:INDEX(Sheet1!B:B,COUNT(Sheet1!A:A)))
5957日前view17
全般
質問者が納得別ページ とは？ 別シートとすると・・・あと一歩ですね？
VLOOKUP(検索値,範囲,列番号,検索の型) ・・・ですから
>A1~A500に当てはまる数字の右がわのあたいをD2にもってくる｡式8D2､別表!$A$1:$B$500,2) なら
別表 が Sheet1(データ元） なら・・・・・
=VLOOKUP(A2,Sheet1!$A$1:$A$500,2,False)
これを D2 （セルD2に入力） 下方向 500行までコピーします
6277日前view17
- 1
