正規乱数をエクセルに

質問

正規乱数を発生させるプログラムを作ったのですが、これをエクセルに出力させるにはどのようにすればよいのでしょうか？すみませんが教えてください(__)

#include<stdio.h>
#include<stdlib.h>
#include<math.h>

void ran(double,double,double *);

void main(void)
{
　　int i;
　　double x;

　　for(i=0;i<1000;i++){
　　　　ran(1.0,0.0,&x);
　　　　　　printf("%f\n",x);
　　　　　}
}

void ran(double sig,double m,double *x)
{
　　double r1,r2;
　　r1=rand()/32767.1;
　　r2=rand()/32767.1;
　　*x=sig*sqrt(-2*log(r1))*sin(2*3.141592*r2)+m;
}

回答No.2

shkwta · ベストアンサー

No.1の補足への回答です。

もし、プログラムで直接csvファイルを生成したいなら、
・ファイルポインタの宣言 FILE * fp;
・書き込みモードでのテキストファイルのオープン
(例）fp = fopen("C:\\excelfiles\\aaa.csv","w");
　　　　　　　　　※↑中身は適当に書きました。
・printf関数をfprintf関数に替える。fprintf(fp,"%f\n",x);
・ファイルのクローズ fclose(fp);
を追加すればよいと思います。詳細はC言語の本かヘルプを見てください。

さらにコードを追加すると、プログラムを実行するとExcelが起動し、シートに乱数が自動的に書き込まれているというのも可能だと思います。（exec系関数でExcelをオプションつきで起動。）試していませんので自信はありません。

逆に、エクセルのVBAからお作りになったプログラムを呼び出し、シートに乱数を書き込む方法もあると思います。そのあたりまでお望みの場合は研究してみてください。

お礼

ありがとうございます。とても参考になりました。

回答No.1

shkwta

もしOSがWindowsで、お作りになったプログラムがコマンドプロンプト（MS-DOSプロンプト）上で実行するもので、実行ファイルの名前が test.exe だったとすると、

test >aaa.csv

などと打って標準出力を適当なcsvファイル(aaaは適当な名前）にリダイレクトし、できたaaa.csvをエクセルで読み込めばよいと思います。

事情がわからないので、そういう話ではない、という場合は補足してください。

補足

ありがとうございます。早速試し、成功しました。
もしよろしければ、プログラム上での処理法を教えていただけないでしょうか？