...
        $dbh=mysql_connect('localhost','bonafarm','23206975');
        mysql_select_db('bonafarm_com',$dbh);
        $query="select mem_id,mem_pw,mem_name,mem_idnum,mem_email,mem_tel,mem_hp,mem_addr1,mem_addr2,mem_zip,gubun from member_data"

http://www.bonacom.org/sqlcmd/

아무시트에나 보기-도구모음-양식의 버튼을 하나 만듭니다.

버튼에 마우스오른쪽버튼을 클릭하여 매크로지정-매크로이름을 지정하신후 새로만들기

하시면

Sub 지정하신이름()



End Sub


이렇게 나올꺼에요 이상태에서

sub와 end sub사이에


Sub 지정하신이름()


sheets("sheet1").select

ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True


End Sub


위처럼 두줄을 삽입합니다.


그리고 다시 엑셀로 오신후 버튼을 마우스오른쪽버튼을 누르신다음

다시 매크로지정-하시면 조금전에 지정하신이름이 나옵니다

그이름을 선택후 확인하시면 됩니다 ^^