cistronezk の回答履歴

全526件中221~240件表示
  • CSVデータのn番目だけの値を取得したい

    次のCsvファイルがあります。この2番目の列の値(つまり20,35,58・・・)だけを取得(1次元配列に入れる)したいのです。 ,cosmos,himawari 710,20,106 725,35,131 805,58,175 820,97,180 903,110,180 次のようにしましたが、2番目の値だけの抽出が出来ません。どのように直せば良いでしょうか? <?php $TextData = file("./cosmos.csv"); for($i=0; $i<10; $i++){ $cosmos = $TextData[i][cosmos]; } return $cosmos print_r($cosmos); ?> 出力結果 Array ( [0] => ,cosmos,himawari [1] => 710,20,106 [2] => 725,35,131 [3] => 805,58,175 [4] => 820,97,180 [5] => 903,110,180 )

    • ベストアンサー
    • spindle
    • PHP
    • 回答数3
  • Excel2003で式のコピー

    下記質問のやり直しです。 http://oshiete1.goo.ne.jp/qa5310983.html 実際に使用する式の作成のためにサンプル表を作って練習してます。 A1(=$B$1*5+$C$1/5+$D$1+10) B1(5) C1(60)   D1(20)                     B2(=B1*5) C2(=C1/5) D2(=D1+10) 目的はA1に=$B$1*5+$C$1/5+$D$1+10を貼り付けたいのです。B2,C2,D2の式を順番にA1に貼り付けたいのですが、絶対参照は置いといて、B2はクリック、コピー、形式選択、数式でA1に=B1*5は貼り付け出来ますがC2、D2を追加で貼り付け出来ません。A1に手入力ではなく、作成済みの式をコピーする方法が知りたいです。 又、作成済みの式の相対参照を一括で絶対参照に変更するにはどうしたら良いのでしょうか? どうぞ宜しくご教示下さい。

  • Excel関数:月数の足し算

    初歩的な質問ですみません。 家賃の振り込み表を作るのに、列の値を 2009年10月 2009年11月 2009年12月 2010年01月 ・ ・ と年月までの表示で1月ずつ増えていくようにしたいです。どのような関数を使えば一気に作れるでしょうか。

  • CSVデータのn番目だけの値を取得したい

    次のCsvファイルがあります。この2番目の列の値(つまり20,35,58・・・)だけを取得(1次元配列に入れる)したいのです。 ,cosmos,himawari 710,20,106 725,35,131 805,58,175 820,97,180 903,110,180 次のようにしましたが、2番目の値だけの抽出が出来ません。どのように直せば良いでしょうか? <?php $TextData = file("./cosmos.csv"); for($i=0; $i<10; $i++){ $cosmos = $TextData[i][cosmos]; } return $cosmos print_r($cosmos); ?> 出力結果 Array ( [0] => ,cosmos,himawari [1] => 710,20,106 [2] => 725,35,131 [3] => 805,58,175 [4] => 820,97,180 [5] => 903,110,180 )

    • ベストアンサー
    • spindle
    • PHP
    • 回答数3
  • Select Case文についてご教授お願いします。

    助けて下さい。Select Case文についてご教授お願いします。現在VB2008にてプログラムを作成しているのですが、どうにも煮詰まってしまいました。 作成内容は、Excelの任意のSheetから文字をVB上のTextBox1~50に呼び出し、その内いくつかをCheckBoxとButtonを使用してRichTextBox1に表示させると共に、TextBox51に入力した文字をExcelから呼び出した任意の文字に対応したセルへ保存というものです。Excelからの呼び出しにIf文を使用しているため、同一プロシージャ内で別のIf文を使用してしまうと、先のIf文で決めた変数が反映されないためSelect Case文を使用して保存をさせようとしているのですが上手くいきません。以下に現在のコードを記載しますのでよろしくお願いいたします。 Private Sub Button1_Click~ Excel取得コード If RadioButton1.Checked = True AndAlso RadioButton13.Checked = True Then 'Sheetと列を選択 tuki = CType(Book.Worksheets.Item(2), Microsoft.Office.Interop.Excel.Worksheet) 'Sheet情報 COLUMN1 = "B" '列1情報 COLUMN2 = "F" '列2情報 ・ ・ ・ End If 'ここから先は指定したTextBoxをRichTextBoxに表示(先のIf文内の変数は未使用) RichTextBox1.Clear() If Me.CheckBox1.Checked = True Then RichTextBox1.Text = TextBox1.Text End If If Me.CheckBox2.Checked = True ThenIf RichTextBox1.Text <> "" Then RichTextBox1.Text = RichTextBox1.Text & "・" End If RichTextBox1.Text = RichTextBox1.Text & TextBox2.Text End If ・ ・ ・ End If 'ここから保存指示=エラー箇所 Select Case tuki.Range(COLUMN1 & "3").Value Case RichTextBox1.text = tuki.Range(COLUMN1 & "3").Value tuki.Range(COLUMN2 & "3").Value = TextBox51.Text Book.Save() という感じで作成しているのですが「String "" から型 'Boolean' への変換は無効です」と表示されます。 他のケースではIf文の変数をSelect Caseに対応できたので、この方法を選択しました。 基本的にSelect Caseの使い方が誤っていると思うのですが解決策が見つかりませんでした。 他の方法も含めて、良い案がありましたらご教授お願いいたします。 長文申し訳ありません。

  • エクセルのシート保護で、セルの書式(計算式)だけを保護(ロック)する方法はありませんか?

    オフイス2003のエクセルを使用しております、仲間で表を使うので計算式が入ったセルを誤ってデリートキーをたたいても書式だけは消えないようにしておきたい。書式のシート保護をするように習いましたが、セルだけを保護(ロック)する方法はないでしょうか?

  • エクセルの計算式について

    よろしくお願いします。エクセルの計算式についてご質問をさせてください。 C1~C5に税込みの売上を入力した際に、隣の列のD1~D5の列に税抜きの価格を表示したく以下のような記事をしました。 =C3/1.05 すると、仮にC1に¥100と入力するとD1の表示は¥95となるのですが C1に¥1000と入力するとD1の表示が¥952となってしまいます。間違った表記では無いはずですが、私的には¥1000と入力した場合には¥950と表示できる様に、¥10000と入力した場合には¥10500と表示できるようにしたいのですが、このようなことはできない物でしょうか? 私なりに調べて以下のような記述もしてみたのですが、やはりうまく行きませんでした。 =rounddown(C1*1.05,0) ご指導の程よろしくお願いします。

  • 異なるプロセスですでに開かれているキューのオープンができません

    現在、Linux(Suse10.3)の環境でPOSIXのメッセージキューを用いたプロセス間通信のプログラムを作成しています。 mq_openでメッセージキューをオープンしているのですが、 異なるプロセスですでに開かれているキューのオープンができません。 最初にオープンしたキューは受信専用、異なるプロセスでオープンするキューは送信専用です。 errnoを調べましたが、 EACCES("\nキューは存在するが、呼び出し元が指定されたモードでそのキ>ューをオープンする許可を持たない。")となっています。 プロセスAの第3引数についてはmode_t S_IRWXU=0x777;としていますが、この辺りの設定方法がよくわかりません。 例) <プロセスA(プロセスBより先に実行)> msqid = mq_open(   "/sample001", O_RDONLY | O_CREAT, S_IRWXU, &mqattr); cout << "msqid:" << msqid << enld; msqid:3 <プロセスB> mqd = mq_open("/sample001", O_WRONLY); cout << "msqid:" << msqid << enld; msqid:-1 ///////////////////////////////////////////////////////////// //errnoは下記の通りです。 ///////////////////////////////////////////////////////////// EACCES(キューは存在するが、呼び出し元が指定されたモードでそのキ>ューをオープ>ンする許可を持たない。) 何か心当たりはありませんでしょうか?

  • accessのクエリについて

    お世話になっております。 accessで、一つのテーブルから数列選んでクエリを作成していますが、 新たに一列設けて、レコードの数だけ、7000番台から始まる番号 を振って行きたいのですが、その様な事は可能でしょうか。 お教え頂きたく宜しくお願い申し上げます。      記  番号   ****  **** 7001   ああああ   1111 7002   いいいい   2222 7003   うううう    3333

  • 毎日プログラムを終了させる方法

    こんばんわ。 vb6で、サーバー/クライアントシステムで、10人ほどユーザーをもつシステムがあります。 毎日、夜中にサーバーが定期的な処理をします。 (その日全員が行った作業のバックアップをとります) その際に、全10人のクライアントのプログラムを終了させる必要がありますが、サーバーから自動的にvb6のプログラムを終了させる方法がありますでしょうか? ツール費用などかかったり、方法がなければ運用でカバーしてもらうしかないでしょうか。 何かよい方法があればご教授願います。

  • データベース接続文字列の暗号化もしくはセキュリティ対応

      ASP(VBScript)で作成されたWebアプリケーションにおいて、 インクルードファイルにデータベース接続文字列を平文で定義しています。 これがセキュリティ上問題ありとのことで、 暗号化もしくはセキュリティ対応を行わなければならなくなりました。 いろいろと調べてみましたが策が見付からずここに投稿させて頂きました。 もし常套手段や良策などを知っている方がいましたらご教授いただけるととても助かります。 宜しくお願いいたします。  

  • Excelのontimeについて

    a1に数式が入っています。 c3からd3,e3,f3…に一定時間ごとにa1の値を入力するマクロがあります。 Sub 入力() Sheets("Sheet1").Select Range("a3").End(xlToRight).Offset(0, 1).Select ActiveCell.Value = Cells(1, 1).Value End Sub Sub スタート() Dim MyTime As Date Dim Jikan As Date Dim i As Integer Jikan = TimeValue("13:59:00") For i = 0 To 5 MyTime = Jikan + TimeSerial(0, 0, 5) * i Application.OnTime MyTime, "入力" Next End Sub で、教えていただきたいのですが、"入力"を動かしている途中で 上記のマクロをとめるにはどうしたらよいのでしょう? ご教授ください。

  • 入力フォームの入力チェックについて

    皆様こんにちは、宜しくお願い致します。 現在、ASP.NET2.0で業務用Webアプリを開発しています。 入力フォームサブミット時の入力チェックについてですが、 Validatorコントロール含むサーバサイドのみでは不十分 なのでしょうか? 職場では、PerlやASP案件はJavascriptを使用してクライアント サイドとサーバサイドで同様の入力チェックを実装しておりますが、 特に仕様や規約で決まっている訳ではない為、実装理由を上司に 尋ねると「まぁ念の為にね」という回答でした。 その為、今回も念の為にクライアントサイドの入力チェックも 実装しようという事ですが、私としましては工数が増えるだけで 同様のチェックを両サイドで行うメリットが分かりません。 職場は小さい会社で、初めてのASP.NET案件の為、他に経験者が おらず困っています。 ケースバイケース、という事もあるかと思いますが、ASP.NET もしくはWebアプリ開発の一つの手法として、経験者様からの アドバイスを頂戴致したく、宜しくお願い致します。

  • 【エクセル・関数】二つの文字列を検索キーとした検索結果を表示させたいです

    いつもお世話になっております。 早速ですが質問させていただきます。 あるセルに入力されている二つの文字列を検索キーとして、 検索を行いたいです。 言葉で説明するのは難しいのでファイルを添付させていただきます。 お手数ですが、教えていただけましたらとても嬉しいです。 何卒よろしくお願いいたします。

  • 【エクセル・関数】二つの文字列を検索キーとした検索結果を表示させたいです

    いつもお世話になっております。 早速ですが質問させていただきます。 あるセルに入力されている二つの文字列を検索キーとして、 検索を行いたいです。 言葉で説明するのは難しいのでファイルを添付させていただきます。 お手数ですが、教えていただけましたらとても嬉しいです。 何卒よろしくお願いいたします。

  • Excel VBAについての質問です

    シート1のセルA1で文字が入力されたら3つ下へ(A4へ)、A4で文字が入力されたら3つ下(A7へ)…としたいのですが、どうすれば良いのですか? VBAを使う方法と使わない方法をそれぞれ、もしくは一方を教えて頂きたいのですが、よろしくお願いします。

    • ベストアンサー
    • noname#140980
    • Visual Basic
    • 回答数3
  • ログの書き込み終了をVBScriptで捕らえることは可能でしょうか?

    とあるシステムで3分ごとに書き込みが行われるログがあります。 それをプログラムでコピーしたいのですが書き込み最中にコピーはまずいですよね・・ (ロックはされるかもしれないが・・??) 書き込みが終了した時点をプログラムで判断することは可能でしょうか?

  • Excelのontimeについて

    a1に数式が入っています。 c3からd3,e3,f3…に一定時間ごとにa1の値を入力するマクロがあります。 Sub 入力() Sheets("Sheet1").Select Range("a3").End(xlToRight).Offset(0, 1).Select ActiveCell.Value = Cells(1, 1).Value End Sub Sub スタート() Dim MyTime As Date Dim Jikan As Date Dim i As Integer Jikan = TimeValue("13:59:00") For i = 0 To 5 MyTime = Jikan + TimeSerial(0, 0, 5) * i Application.OnTime MyTime, "入力" Next End Sub で、教えていただきたいのですが、"入力"を動かしている途中で 上記のマクロをとめるにはどうしたらよいのでしょう? ご教授ください。

  • accessで画像を動かすにはどうしたらいいでしょうか

    accessを使用している初心者です。top画面を作っているのですが質問があります。 画像を貼り付け、コマンドボタンを押したらその画面が上(または下)に動かすプログラムはどうやったら作れるのでしょうか?

  • Excelのontimeについて

    a1に数式が入っています。 c3からd3,e3,f3…に一定時間ごとにa1の値を入力するマクロがあります。 Sub 入力() Sheets("Sheet1").Select Range("a3").End(xlToRight).Offset(0, 1).Select ActiveCell.Value = Cells(1, 1).Value End Sub Sub スタート() Dim MyTime As Date Dim Jikan As Date Dim i As Integer Jikan = TimeValue("13:59:00") For i = 0 To 5 MyTime = Jikan + TimeSerial(0, 0, 5) * i Application.OnTime MyTime, "入力" Next End Sub で、教えていただきたいのですが、"入力"を動かしている途中で 上記のマクロをとめるにはどうしたらよいのでしょう? ご教授ください。