Excel(エクセル)

全11539件中11261~11280件表示
  • webクエリー

    excel 2010でつくったwebクエリーのファイルをexcel2013で開くとクエリーが更新されずかたまってしまい、そのまま放置しても同様で困っています。原因と解決策についてご教示頂けると幸いです。ステータスバーはwebに接続中。。。となっています。

  • エクセル2003 期間内に当てはまる名前を表示

    いつも回答して頂きありがとうございます。 期間内に当てはまる項目を全て表示させる場合どうしたらよいでしょうか?宜しくお願い致します。 2013/1/1の下(D9セルより下に)には、2013/1/1~2013/1/10まででHitする項目(全部で46あります)を全て表示させたい。画像の場合だったら cc を表示させたい。 ※項目は14行目に記載されている語句です。

  • 【エクセルマクロ】画像挿入について教えてください。

    Excel2010で下記マクロを実行し、 画像挿入元のフォルダ名を変更・削除したり、メールに添付して送信したりすると「リンクされたイメージを表示できません。ファイルが移動または削除されたか、名前が変更された可能性があります。リンクに正しいファイル名と場所が指定されていることを確認してください。」 と表示されます。 Excel2010では、Shapes.Addメソッドを使用するとリンク解除ができるとのことで、 初心者ながら色々試してみたのですが、うまくいきません。 マクロ初心者のため、詳しく教えていただけると大変助かります。 Private Sub Del_Btn_Click() 指定セル範囲 = "C18:K500" With ActiveSheet Set セル範囲 = .Range(指定セル範囲) For Each 図形 In .Shapes If 図形.Type = msoPicture Then Set 共有セル範囲 _ = Intersect(Range(図形.TopLeftCell, 図形.BottomRightCell), セル範囲) If Not (共有セル範囲 Is Nothing) Then 図形.Delete End If End If Next End With End Sub Private Sub Ins_Btn_Click() Dim fName As Variant Dim i As Long Dim j As Integer Dim k As Integer Dim Pict As Picture Const z1 As Long = 246 'サイズ指定 Const z2 As Long = 184 'サイズ指定 Dim z3 As Long '上位置 z3 = 306 k = 1 fName = Application.GetOpenFilename("JPGファイル, *.jpg", MultiSelect:=True) If IsArray(fName) Then Application.ScreenUpdating = False '配列に格納されたファイル名をソート BubbleSort fName, True 'If UBound(fName) >= 19 Then ' j = 19 ' Else j = UBound(fName) 'End If For i = 1 To j Set Pict = ActiveSheet.Pictures.Insert(fName(i)) If i Mod 6 = 5 Then z3 = z3 + 18.5 - k k = k + 0.5 End If If i Mod 2 = 1 Then With Pict .Width = z1 '横型 .Height = z2 '縦型 .Top = z3 + 146.5 * (i - 1) '上位置 .Left = 83 '左位置 .Locked = False ico = ico + z1 + 10 '間隔指定 End With Else With Pict .Width = z1 '横型 .Height = z2 '縦型 .Top = z3 + 146.5 * (i - 2) '上位置 .Left = 350 '左位置 .Locked = False ico = ico + z1 + 10 '間隔指定 End With End If ActiveCell.Offset(2, 0).Activate Application.StatusBar = "処理中:" & i & "/" & UBound(fName) & "枚目" Next i End If With Application .StatusBar = False .ScreenUpdating = True End With Set Pict = Nothing If i > 0 Then MsgBox j & "枚の画像を挿入しました", vbInformation End If End Sub '値の入替え Public Sub Swap(ByRef Dat1 As Variant, ByRef Dat2 As Variant) Dim varBuf As Variant varBuf = Dat1 Dat1 = Dat2 Dat2 = varBuf End Sub '配列のバブルソート Public Sub BubbleSort(ByRef aryDat As Variant, _ Optional ByVal SortAsc As Boolean = True) Dim i As Long Dim j As Long For i = LBound(aryDat) To UBound(aryDat) - 1 For j = LBound(aryDat) To LBound(aryDat) + UBound(aryDat) - i - 1 If aryDat(IIf(SortAsc, j, j + 1)) > aryDat(IIf(SortAsc, j + 1, j)) Then Call Swap(aryDat(j), aryDat(j + 1)) End If Next j Next i End Sub どうぞよろしくお願いいたします。

  • ゲームの記録に順位を付ける事出来ますか?問2

    教えていただいたRANK()関数を含むBVAのデータを 昇順並び替えしたデータです。N列に5台ほどの車名が複数あり O列にタイムが130行ほどあります。 Q1に記入した車名1のタイムをO列から抽出コピーし、Q2以下に表示したいです。 どうすべきかお助け頂ければ幸いです。 R1、S1、・・・・・に車名2,車名3、、、と続きます。それぞれ同様に抽出します。 ゲーム「TDU2」ハワイ一周タイムトライアル198.2kmは57分52秒11が基準タイムで,それより早ければ賞金2万ドル。 脱輪してもペナルティタイムが付かないため、愛用してまして。 Bugatti Veyron 16.4 の440Km/h が最速で、 Koenigsegg CCXR Edition 、Pagani Zonda Cinque と続きますが、運転つたない私はパガニが1・2・5・6位となっています。がそろそろ自己記録の更新に限界を感じ、スピードの遅い車での遊びをはじめましたが、全体での順位が50位とか100位となり、選択車のみの記録が欲しくなりました。 データに無い新しい車名で記録した時、空きのP列に、1列挿入後、Q1に記入するつもりです。

  • 【Excel】定形文から文字列抽出&問題集【VBA

    問題集を作るための定形文があり、データが入力されています。 例) 問題 これはなんでしょうか。 A.りんご B.ばなな C.みかん D.いちご 正解:C 解説 みかんでしたー。 行数や、選択肢の数が違ったり、 「解説」や「問題」が記入されていなかったりしますが、 問題文と選択肢、 正解、解説をExcelにまとめていきたいです。 上の例をExcelにまとめるとしたら A B C D E F G H 1 これはなんでしょうか A.りんご B.ばなな C.みかん D.いちご みかんでしたー。 F、G列は、選択肢E、Fがあるかもしれないため、保留です。 選択肢のところには必ず A.B.C.D.E.F.などの文字列が入っています。 正解:のところの定形文も必ず入っています。 上の表のようにまとめられるかの回答を よろしくお願い致します。

  • エクセル2003 期間内に当てはまる日付の個数

    いつも回答して頂き、ありがとうございます。 D11セル~H11セルまでに入力された日付の内、D6セルの日付からE6セルの日付の一日前までに当てはまる日付けの個数を集計しようと思い、=SUMPRODUCT(D11:H11>=(D6))*(D11:H11<(E6))と記述しましたが、結果0個でした。 ネット等のサンプルを見ながら記述したのですが思うようにいきません。何処をどう直したらうまくいくのでしょうか?宜しくお願い致します。

  • エクセルで最初の行や列を開けること

    エクセルでA列や1行目を開けるのは基本なのですか? 標準設定ではA1から始まるので、改ページプレビューを使う場合の話になりますが。

  • 特定の文字の条件をつける(画像有

    A列のn行目のセルに特定の文字(例:"サバ")があった場合、Bnには=B2、Cnには=C2の命令をして、 特定の文字(サバ)が無かった場合のBnやCnは自由に入力できるようにする方法をご教授願います。 ※画像の(free)は自由に入力できることを意味します

  • エクセルの合計で質問です。

    エクセルで合計のことで質問させてください。 教えてください、1~9行目に仕入れ金額が入っていて10行目に1~9をオートSUMで合計したとします。 たとえば9行目と10行目の間に行を挿入して商品名をどんどん追加した場合には現在ではオートSUMが反映されません。 ドラッグすればいいかと思いますが単純作業なだけになんとか自動計算させたいです。 やり方を申し訳ございませんが教えてください。 宜しくお願い致します。

  • Excelの関数の結合について

    例えば、 セル A10に「あいうえお」、A11に「かきくけこ」、A12に「さしすせそ」、 とします。 A1 に A10 の文字を表す場合は「=A10」 となります。 A1 は「あいうえお」。 この時の 数字「10」 が変動するので、 セル A2 の数字を使用します。 A2 が 「10」 の時は、A1 は 「あいうえお」 A2 が 「11」 の時は、A1 は 「かきくけこ」 A2 が 「12」 の時は、A1 は 「さしすせそ」 このような場合の A1 はどのようにしたらよいのでしょうか。 「="=A" & A2」 このようにやると 「=A10」 が表示してしまいます。 宜しくお願い致します。

  • WIN7 64bit版でOffice 32bit

    Officeの32bit版だと、メモリーはOSが64bitでも32bit分しか使えないのでしょうか。 100万件程度のデータを扱うのでOSは64bitにしたのですが、今さらOfficeが32bitということに気付きました。

  • Excelの非表示列も含めてコピー

    Excelのデータを別シートにコピーします。 コピー対象には非表示列も含まれていて 非表示列も含んだデータコピーはできているのですが、 貼付け時には非表示になっているデータは表示されて貼付けされます。 これを非表示だった列は非表示のまま貼り付けることは出来ないでしょうか? マクロを使ってコピー貼付けを行います。 よろしくお願いいたします。

  • エクセルマクロでマクロをアクティブにしたくない

    エクセルのマクロをひとつの「マクロA」という名前で、データーファイルからセルに入っている内容などを呼び出しながらまくろAのシートにデーターを貼り付けながら作業をしています。 Workbooks.Open Filename:= _ "C:\Documents and Settings\owner\My Documents\マクロ.xls" Application.Run "マクロ.xls!マクロ" と記載すると、マクロXLSがアクティブになってしまいます。 その為記載に'ActiveWindow.WindowState = xlMinimized と入れたりするのですが、アクティブになるシートがマクロ以外にうまくいかないことがあるのです。 データーシートは、毎回データーが変わる関係で、DATA.xlsがAのときやBのときが発生します。

  • エクセルの表で条件を指定しての整列

    エクセルの表で条件を指定して整列させようとしています。 よろしくお願い致します。 画像のようにA列の商品名に、B列、C列の2つの条件が付いた商品がありD列に在庫数を入れています。 はじめは「画像C表」のように規則を設定したものに従って並んでいたのですが、操作ミスがあり「画像A表」のように行をバラバラにしてしまいました。 A列の商品名、B列、C列の条件とD列の在庫数の横の並び(1行づつの並び方)は元のままです。 A列の商品名、B列、C列の条件の記入内容は半角全角文字様々です。 「画像B表」のような在庫数だけ入っていない表は存在しています。 これを「画像B表」の整列規則に従って元のように並べ直すのに苦労しています。 例えば定型の表である「画像B表」のA2セルとB2セルとC2セルの値が共通の行の「画像A表」のD2セルの値を「画像B表」のD2セルに並べるという方法が出来ればと思うのですが数式をどう設定してよいのか判らない常態です。 実際の商品数(行数)は10,000程あり日常扱っている商品のためかなり焦っております。 確実に元に戻せればどのような方法でも結構です。 初歩的な内容かもしれませんが、よろしくお願い致します。

  • 別ファイルから重複するデータを探したい【エクセル】

    タイトル通りですが、エクセルで複数のファイルにあるデータから重複するコードを探したいのですが、どのようにしたらいいでしょうか? 仮に、ファイルAとファイルBとしますが、 ファイルAには約800件(全て別のコード)のデータがあり ファイルBにも約1000件のデータがあります。 ファイルBにある1000件のうちファイルAで使用しているコードと重複するデータを全て抽出したいのです。 (重複データがあることが判別できるようにしたいです) データはそれぞれの量が違いますし、個別に集計するにはいささか件数が多いので困っています。 分かりづらい文章ですみません… 詳しい方、どうかお知恵を貸してください。 何か補足が必要であれば追記します。どうかお願いしますm(_ _)m

  • Excelの帯グラフの内訳

    PC初心者です。Excelは今回ほぼ初めて使うようなものなので、ぜひ教えていただければと思います。 現在棒グラフを三つ作成しようと思っています。それぞれ単位は同じなのですが内訳の数が全く違うので、やり方が分からなくなっています。インターネットで検索したところ内訳の数が同じ場合のものしか見つけらずどうしたものかと悩んでいます。 まとめると、今私が作りたいグラフは ・単位が同じ(円)の棒グラフ三つ ・内訳の数、種類が異なるが、同じグラフ(画面?)上に三つとも載せたい ということになります。 よろしくお願いします。

  • 大容量のエクセルファイル

    3万行くらいで20MBくらいのエクセルファイルを扱っているのですが、 保存に時間がかかったり、表示に時間がかかったりします。 容量を減らす方法や表示を早くする方法はありますか?

  • Excel 範囲を選択してコピー

    Excel 2003です。 関数ABC()を ABC(B7,E4) ABC(B8,E4) の2行を選択して"+"表示がでてから次の行へコピーします。 ABC(B9,E4) ABC(B10,E4) となると期待したのですが ABC(B9,E6) ABC(B10,E6) となってしまいました。 期待したようにする方法がありましたら教えてください。

  • 重複データの削除 条件付き

    Excel2010を使用しています。 単純に重複データの削除でしたらフィルタの機能でいいのですが、 価格のみ違うデータがあるので困っています。 例: メロン 120円 メロン 130円 リング 99円 リング 85円 高い方もしくは安い方を消す場合どうすればよいのでしょうか?

  • エクセルの仕様について

    エクセルは画面で表示される内容と印刷される内容が違うので、 印刷プレビューで事前確認することが不可欠です。 印刷プレビューも万能ではなく、罫線などが正確に表示されません。 この仕様は今日2013のバージョンまで改善されることがない仕様です。 これはwikiでは「Excelでは、表計算ソフトという性質上、画面表示の厳密さよりも速度を優先しているため、画面上に表示される内容と印刷時の表示が必ずしも一致しない。」とあります。 最近はPCの性能が昔と比べて飛躍的に上がっているので、 ある程度速度を落としても正確なものができそうに思うのですが、できないのですか? 原因が技術的なものなのか、MSのやる気がないだけなのかどちらなのでしょうか。